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OFFERTA SPECIALE Valida dal 5 aprile al 20 maggio 1989, presso 
i Rivenditori che aderiscono all’iniziativa, salvo esaurimento delle scorte. 


Un fantastico PC MS-DOS! con 



La soluzione co 


A PARTIRE DA 


♦ IVA 


PC 1512 SD MM 
STAMPANTE DMP 3160 MOUSE 
MS-DOS ABIUTY GEM 


XT IBM® 
compatibile 


Testi, archivio, 
foglio elettronico, 
tutto insieme 



APPROFITTANE IN TEMPO. 

Oggi puoi fare tutto e subito: approfitta 
delrofferta speciale Amstrad. Attenzione, 
è valida dal 5 aprile al 20 maggio 1989- 
Approfittane subito! 

CHIEDI AL TUO RIVENDITORE LE ALTRE 
PROMOZIONI CON PC + PORTATILE! 

li TROVI QUI. 

Presso le grandi catene EXPERT (Pa¬ 
gine Gialle), SINGER/EXCEL (tei. 


KIT 

elementi 

prezzo 

vecchio 

IVA esclusa 

prezzo 

nuovo 

IVA esclusa 

CI 

PC 1512SDMM-A + DMP 3160 

1.448.000 

1.209.000 

C2 

PC 1512DDMM-A + DMP 3160 

1.748.000 

1.469.000 

C3 

PC 1512SDCM-A + DMP 3160 

1.748.000 

1.509.000 

C4 

PC 1512DDCM-A + DMP 3160. 

2.098.000 

1.819.000 

C5 

PPC 512SD + DMP 3160 

1.448.000 

1.229.000 

C6 

PPC 512DD + DMP 3160 

1.798.000 

1.569.000 

C7 

PPC 640DD + DMP 3160 

2.048.000 

1.819.000 

C8 

PC 1640SDMD-A + LQ 3500 

1.948.000 

1.579.000 

C9 

PC 1640DDMD-A + LQ 3500 

2.298.000 

1.919.000 

CIO 

PC 1640HDMD-A + LQ 3500 

2.948.000 

2.569.000 

































stampante e tantissimo software. 

a772.000* Lire. 



inclusa. 


* Prezzo riferito alla configurazione C19 IVA 


KIT 

elementi 

prezzo 

vecchio 

IVA esclusa 

prezzo 

nuovo 

IVA esclusa 

C11 

PC 1640SDECD-A + LQ 3500 

2.648.000 

2.269.000 

C12 

PC 1640DDECD-A + LQ 3500 

2.998.000 

2.519.000 

C13 

PC 1640HDECD-A + LQ 3500 

3.648.000 

3.069.000 

C14 

PC 1640SDMD-A + LQ 5000 

2.298.000 

1.749.000 

CI 5 

PC 1640DDMD-A + LQ 5000 

2.648.000 

2.099.000 

CI 6 

PC 1640HDMD-A + LQ 5000 

3.298.000 

2.749.000 

C17 

PC 1640SDECD-A + LQ 5000 

2.998.000 

2.449.000 

C18 

PC 1640DDECD-A + LQ 5000 

3.348.000 

2.749.000 

C19 

PC 1640HDECD-A + LQ 5000 

3.998.000 

3.349.000 






02-646778227), COECO e presso tan¬ 
tissimi altri punti vendita Amstrad: 
cercali su “Amstrad Magazine” in edi¬ 
cola, (troverai altre notizie). 

Oltre 150 punti 
di assistenza. 

PRONTO 
AMSTRAD. 

Telefona allo 
02-26410511. DALLA PARTE DEL CONSUMATORE 
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Autoprogramma grafico 



Complimenti per l'APG. L'ho copiato. Fun¬ 
ziona egregiamente. Per il mio MSX 8010 
(con il quale coltivo interessi grafici nono¬ 
stante la bassa risoluzione) l'APG non fa 
solo risparmiare tempo ma aiuta a creare i 
più piccoli spostamenti. Per le cancellazioni 
mi sembra molto più pratico intervenire sul¬ 
le linee dell'APG al momento della loro 
"convalida”. Per il cerchio l’APG non pro¬ 
duce le frazioni ne il rapporto tra i due dia¬ 
metri ma per questo si può intervenire sulle 
linee dell'APG. 

Per chi si è già avventurato nella program¬ 
mazione di modesti programmi grafici, 
l'APG è un’ottimo strumento! 


Bruno Munì - Piombino 


In effetti l’APG (autoprogramma grafico), 
creato per gli MSX e poi esportato in altre 
macchine, ha avuto ed ha ancora una lar¬ 
ga approvazione da parte dei lettori, per 
cui, se questo programma vi fosse sfuggito 
potreste senz’altro richiederlo, registrato su 
cassetta o disco, alla redazione di LIST (ve¬ 
di pagina “servizio programmi”). L’autore 
dell’APG ringrazia sentitamente il cortese 
lettore di Piombino per i consigli dati e le 
belle parole espresse. 


Assembler e tasti funzione 
del PC 128 S 



Possiedo un Olivetti Prodest 128 Se ricorro 
ancora una volta alla Vostra cortesia per 
avere alcuni chiarimenti: 

- nel programma KEV WORD pubblicato sul 
numero 7-8/88, qual è il significato del¬ 
l’istruzione POKE della linea 410 e segg.? 

- è possibile modificare il funzionamento 
del programma semplicemente inserendo il 
comando desiderato nei DATA, senza ap¬ 
portare altre modifiche al listato? Non 
avendo familiarità con il linguaggio Assem¬ 


bler, non vorrei combinare pasticci 

- come è possibile definire i tasti funzione in 
modo tale che assumano significati diversi 
se premuti da soli o contemporaneamente 
ai tasti SHIFT oppure CTRL? 

- dopo aver duplicato il disco Welcome con 
il comando * BACKUP 0 0 la copia si blocca 
durante la schermata iniziale, ed appare il 
messaggio di errore BROKEN DIRECTORY 
AT LINE 120. La linea 120 del LOADER con¬ 
tiene *DIR &.WI*.R. Da cosa può dipendere 
questo malfunzionamento? 

Mario Di Lorenzo - Torino 

La POKE di cui lei parla non rappresenta 
un’istruzione, come potrebbe sembrare, 
bensì una semplice variabile. È possibile 
modificare i DATA, ma sempre seguendo la 
regola generale, per inserire dei comandi 
personalizzati. / 

I tasti funzione sono definibili, come ben 
sappiamo, da FO a F9 mediante l’istruzione 
*KEYn, dove n è il numero del tasto. Pur¬ 
troppo non è possibile associare questi ta¬ 
sti a CTRL e SHIFT, in compenso possiamo 
dirvi che la funzione definita con il tasto FIO 
viene eseguita alla pressione del tasto 
BREAK. 

Per quanto riguarda la copia del disco Wel¬ 
come, consigliamo di usare il programma 
SDBACKUP contenuto nel sottomenu 
ADFS. La copia sarà a prova di errori! 


Come trasferire ViewSheet 



Sono possessore di un OLIVETT1128 S e let¬ 
tore affezionato della vostra rivista. Premet¬ 
to che non so nulla di BASIC e di program¬ 
mazione in genere, e quindi uso il mio com¬ 
puter più che altro come macchina da scri¬ 
vere. Utilizzo i programmi VIEW e VIEW- 
SFIEET del disco Welcome, e ho fatto tesoro 
di quanto contenuto nell’articolo di F. Fa- 
brizi "EASY WORD". 

Gradirei sapere se esiste una procedura 


per trasferire anche ViewSheet sul dischetto 
di lavoro, come suggerito per View. 

Fausto Colombo - Milano 

Dopo aver eseguito il !BOOT del disco Wel¬ 
come, bisogna premere il tasto BREAK, in¬ 
serire il disco su cui si vuole salvare il View¬ 
Sheet e digitare *DIR$, seguito poi dal co¬ 
mando del MOS *SRSAVE VIEWSHEET 
8000 + 4000 7 Q I. Il gioco è fatto. 


Quando il word processor 
non funziona... 



Sono in possesso di un IBM compatibile ed 
ho provato a caricare il programma 
" WORD PROCESSOR" che ho trovato sulla 
vostra rivista del mese di dicembre '88, ma 
non sono riuscito a farlo funzionare. Potre¬ 
ste spiegarmene il motivo? 

Luciano Scattoni - Orvieto (TR) 

Dobbiamo ammettere che questo program¬ 
ma ci ha creato non pochi problemi, dovuti 
al fatto che durante le prove in redazione il 
listato gira perfettamente mentre molti letto¬ 
ri ci hanno scritto lamentando un cattivo 
funzionamento. Abbiamo però scoperto l’o¬ 
rigine dell’inconveniente: tutto dipende dal¬ 
la versione del GW-BASIC utilizzata. Infatti il 
Word Processor in questione funziona per¬ 
fettamente con le release 3.11 e precedenti, 
mentre mostra alcuni difetti se si usano le 
release 3.21 e successive. 

Per il momento non possiamo far altro che 
consigliare ai lettori interessati, di munirsi di 
una delle versioni del GW-BASIC “compati¬ 
bili” con il programma di Franco Epifani. 


Ciak, si gira! 



Sono possessore di un computer Philips 
NMS 8280 (MSX 2), ed un nuovo acquirente 
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della vostra rivista, visto che forse è l’unica 
ad interessarsi di questo computer in ma¬ 
niera eccellente. 

Ho acquistato questo sistema alcuni mesi 
or sono, con l’unico scopo di manipolare le 
immagini video, in quanto possiedo un mo¬ 
desto studio di videoregistrazione dove ela¬ 
boro riprese di cerimonie matrimoniali, vi¬ 
deo sportivi, avvenimenti particolari, ecc. 

In dotazione all'apparecchio mi è stato for¬ 
nito il software “Videographic” per creare 
degli ottimi effetti, ma a quanto pare tutto il 
sistema si limita a questo solo programma, 
dal momento che non sono riuscito a trova¬ 
re in negozi specializzati altro software si¬ 
mile. 

Concludendo, mi appello a voi per incre¬ 
mentare il software del mio computer! 

N.B. Non sono il solo ad avere questo pro¬ 
blema: con dei miei conoscenti ci chiedia¬ 
mo se sia necessario sostituire l’8280 con 
un Amiga 500. Voi cosa ne pensate? 

Marco Sensoli - Fano (PS) 

La rubrica “Super MSX2 & Video Digitali” è 
stata pensata non solo per i programmato- 
ri, ma anche per i cosidetti operatori del¬ 
l’elaboratore in questione, prova ne sia il 
disk “EFFETTI SPECIALI 1” al quale segui¬ 
ranno altri programmi di prossima vendita. 
Rimane il fatto che altri dischetti per l’NMS 
8280 di varie software house portano il no¬ 
me di: VIDEOGRAPHICS-SONY, QUICK TE- 
LOPPER, DIGITIZE PLUS E Q-MANAGER. 
Per maggiori informazioni, comunque, sarà 
bene rivolgersi direttamente ai negozi spe¬ 
cializzati, quasi sempre segnalati anche 
sulle Pagine Gialle. 

Riguardo al cambio Amiga 500/NMS 8280, 
come Misteriano incallito le posso solo dire 
che ho appena finito un programma dal ti¬ 
tolo “IMAGO” che ha la possibilità di elargi¬ 
re almeno 2500 variazioni (fra solarizzazio¬ 
ni, grafismi, ecc.) per ogni vostra immagine 
salvata su disk... e anagrammando IMAGO 
vien proprio fuori AMIGO, il grande AMIGO 
8280. Capita l’antifona? 

P.S. IMAGO sarà prossimamente presenta¬ 
to su LIST. 


Catalogo 



Sono un appassionato lettore della vostra 
rivista da soli due mesi, in quanto da tale 
periodo sono in possesso di un OLIVETTI 
PRODEST PC128S. 

In riferimento al programma CATALOGO 
apparso su LIST 10/88 e successiva ERRA¬ 


TA CORRIGE apparsa su LIST 11/88, non 
sono ancora in grado di poter avviare il 
suddetto programma in quanto: 

1) alla riga 230 il computer visualizza: NO 
SUCH VARIARLE AT LINE 230; 

2) nonostante la rettifica per l’apertura ini¬ 
ziale del file al punto 5 del suddetto pro¬ 
gramma, il computer visualizza il vocabolo 
CHANNEL. 

Gradirei quindi ricevere ulteriori chiarimenti 
su questo programma. 

Angelo Scandurra - Paterno (CT) 

L’inconveniente NO SUCH VARIABLE può 
essere facilmente eliminato controllando di 
aver correttamente digitato la variabile 
Max% nelle linee 140 e 230. L’errore CHAN¬ 
NEL è dovuto al fatto che ADFS non trova 
sul disco il file: Lista—Nomi. È proprio con 
questo nomefile che deve essere ripetuto il 
punto numero 5 dell’articolo di accompa¬ 
gnamento. 

Approfittiamo per ricordare che il nomefile 
in questione è lo stesso presente alla linea 
220 . 


Antifurto elettronico 



Nel numero di Novembre 1988, è stato pub¬ 
blicato il programma “ANTIFURTO COM¬ 
PUTERIZZATO" con allegato lo schema 
dell'interfaccia da costruire. 

A questo proposito vorrei avere ulteriori de¬ 
lucidazioni sull’utilizzo di questa interfac¬ 
cia. Sullo stesso numero della rivista è ap¬ 
parsa l'ERRATA CORRIGE del programma 
MERGE: vorrei sapere dove inserire le routi¬ 
ne mancanti. 

Vorrei inoltre sapere se esiste in commercio 
un programma per il PC128S per la gestio¬ 
ne delle cartelle cliniche, come quello per i 
computer MSX. 

Alberto Corradini - Borgofranco sul Po 
(MN) 

Vediamo di rispondere con ordine alle sue 
domande. Il programma Antifurto Compu¬ 
terizzato è stato ideato per proteggere quei 
locali ove sono situate attrezzature di una 
certa importanza, in modo che se qualcuno 
tentasse di entrarvi a nostra insaputa, ne 
saremmo subito avvertiti. Naturalmente le 
applicazioni sono moltissime, anche se li¬ 
mitate dal fatto che il suono prodotto dal 
PC128S non è udibile a grande distanza. 
Le routine presenti nell’errata corrige da lei 
menzionata, sono da inserire nella stessa 


directory del programma MERGE e non nel 
programma stesso. 

Per quanto riguarda il programma da lei ri¬ 
chiesto la informiamo che ne è in fase di 
studio una versione per il PC128S. 


Conversione da CWBasic 
a Basic MSX 



Ho comprato da poco un computer MSX2 
PHILIPS 8235. Dopo aver visto, e giocato, 
con l’innumerevole software ricreativo, mi 
sono messo alla programmazione. Avendo 
una precedente esperienza in ambiente 
MS-DOS, e soprattutto in GWBASIC, ho 
provato a ricopiare alcuni programmi fatti 
in GW BASIC. Mi sono accorto che però 
molti di loro non girano perché non trovano 
istruzioni come RANDOMIZE, CHAIN, GET 
(in ambiente grafico) e altre. 

Perché i programmi in GWBASIC e in BASI¬ 
CA, tranne alcune eccezioni, non mi gira¬ 
no? 


Alvaro Murio - Acilia 

I programmi fatti in BASIC per IBM e compa¬ 
tibili, non gireranno mai sul BASIC MSX. La 
ragione è semplice: innanzitutto il BASIC 
MSX non prevede l’istruzione RANDOMIZE 
come nei compatibili ma solo RND da ese¬ 
guire nella forma “A = RND (-1) Altre 
istruzioni per il BASIC MSX le potrà trovare 
sul suo manuale d’uso. 

Ci sono eccezioni di programmi in BASIC 
che girano sia su MSX sia su compatibili 
IBM, ma solo dove le istruzioni usate sono 
quelle elementari del BASIC (PRINT, LOAD, 
SAVE, INPUT, END, ecc.). 

Un programma tipo: 

10 INPUT“NUMERO”;N 
20 INPUT“ALTRO NUMERO”;N2 
30 N3 = N + N2 
40 PRINT “TOTALE:”;N3 
50 END 

gira sia in ambiente BASIC IBM sia in am¬ 
biente BASIC MSX. 

È chiaro che se poi vengono richiamate 
istruzioni dalla ROM con l’istruzione POKE 
in ambiente IBM succede una cosa e in am¬ 
biente MSX succede un’altra. Provate in 
ambiente MSX “POKE &HFCAB,1 si setta- 
no le maiuscole senza premere “CAPS 
LOCK”; provare su un compatibile la stessa 
istruzione. Nel migliore dei casi il computer 
provvederà a fare un RESET di sistema. Nel 
migliore dei casi. Consiglio al signor Murio 
di non fare prove di conversione da IBM a 
MSX e viceversa e attenersi ai manuali MSX. 
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IL NUOVO 
TANDON 386/33 


Con il Tandon 386/33, finisce l'epoca nel¬ 
la quale i personal computer necessaria¬ 
mente dovevano cedere il passo quando 
per risolvere certi problemi in tempo reale 
erano necessarie alte potenze di elabora¬ 
zione o grandi capacità di memoria o 
quando le applicazioni implicavano l'ac¬ 
cesso a grandi data base, ed altri compiti 
particolarmente gravosi 


Con una velocità di clock di 33 MHz, una 
memoria centrale fino a 24 MB a 32 bit co¬ 
me nei grandi elaboratori, disco rigido fino 
a 660 MB ad eccesso ultra-veloce e molte 
altre caratteristiche speciali, il nuovo Tan¬ 
don 386 si posiziona in un settore che fino 
ad oggi era riservato ai super-minicompu- 
ter e mette nelle mani degli utenti professio¬ 
nali una potenza quasi paragonabile a 
quella di un grande elaboratore da centro 
di calcolo. 

La nuova famiglia di sistemi ad alte presta¬ 
zioni Tandon 386 è equipaggiata di proces¬ 
sori ad alte prestazioni a 32 bit che funzio¬ 
nano con velocità di clock di 25 o 33 MHz. 
Questa prerogativa fa di questo nuovo per¬ 
sonal uno dei più veloci minicomputer di¬ 
sponibili oggi sul mercato. Allo scopo di ga¬ 
rantire la totale compatibilità con tutto il 
software standard MS-DOS, la velocità del 
clock può essere portata a 8 MHz con la 
semplice pressione di un tasto. Questo per 
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garantire agli utenti la protezione degli in¬ 
vestimenti in software effettuati fino ad oggi 
e offrire nel contempo il massimo possibile 
delle prestazioni e della velocità di trasferi¬ 
mento. 

Il nuovo Tandon 386/33 dispone di una 
completa serie di caratteristiche che ne au¬ 
mentano la produttività, funzioni che fino 
ad oggi sono state disponibili esclusiva- 
mente su supermini molto più costosi. Que¬ 
sto significativo incremento delle prestazio¬ 
ni di sistema è il risultato di un acceleratore 
intelligente di comandi in grado di caricare 
in RAM le istruzioni presenti nella memoria 
ROM. Il sistema da 64 Kbyte di memoria sta¬ 
tica cache, che è di serie in questi sistemi, 
contribuisce inoltre ad aumentare in modo 
significativo il rendimento di tutto il sistema. 
Sono anche disponibili come opzione sulla 
scheda di sistema i coprocessori matemati¬ 
ci Weitek e Intel 80387. I due coprocessori 
possono operare simultaneamente. 

Nella versione standard il Tandon 386/33 
viene fornito con 1 MB di memoria RAM e 
può essere potenziato fino a 24 MB con l’in¬ 
serimento di componenti SIMM da 1 MB sul¬ 
la piastra di sistema senza occupare alcun 
connettore di espansione. Allo stesso tem¬ 
po il Tandon 386/33 offre una funzionalità a 
32 bit senza compromessi dal primo all’ulti¬ 
mo chip di memoria. Il sistema dispone dei 
seguenti connettori di espansione: una por¬ 
ta a 8 bit compatibile XT, quattro porte a 16 
bit compatibili AT e una porta a 32 bit per 
una ulteriore espansione di memoria RAM. 
Il controller del disco usa una porta di 
espansione a 16 bit, mentre l’adattatore del 
monitor e la scheda di interfaccia (con una 
interfaccia seriale RS-232-C/V. 24 e una pa¬ 
rallela standard compatibile) impiegano un 
connettore di espansione a 8 o a 16 bit cia¬ 
scuno. 

Il nuovo modello al vertice della gamma dei 
sistemi Tandon è disponibile in diverse ver¬ 
sioni. Tutti i sistemi dispongono di un disk 
drive compatibile AT da 5 1/4" 1,2 MB; in al¬ 
ternativa può essere installato un floppy 
disk drive da 3 1/2” da 1,44 MB. Il disco rigi¬ 
do è gestito da controller ESDI. La famiglia 
Tandon 386/25 (senza disco rigido), Tan¬ 
don 386/25-90 (con disco da 90 MB), Tan¬ 
don 386/25-330 (con disco da 330 MB), tutti 
equipaggiati di microprocessore 80386 ad 
alte prestazioni con frequenza di clock di 
25 MHz. La famiglia dei super-PC Tandon 
386/33 hanno una frequenza di clock reale 
di 33 MHz. Anche per questo sistema sono 
disponibili diverse versioni: Il Tandon 
386/33 è un sistema con il solo floppy disk 
drive senza disco rigido, mentre i modelli 


Tandon 386/33-110, Tandon 386/330 e 
Tandon 386/660 dispongono rispettiva¬ 
mente di memoria di massa su disco rigido 
da 110, 330 e 660 MB. 

La famiglia dei sistemi Tandon 386/33 di¬ 
spone di tastiera universale a profilo piatto 
con un design ergonomico migliorato e di 
un monitor ad alta risoluzione da 14”, verde 
o ambra hercules compatibile, adattabile 
dall’operatore in modo verticale e orizzon¬ 
tale. La risoluzione è di 720 x 348 pixel. Co¬ 
me opzioni sono disponibili un monitor 
EGA da 14” con adattatore (risoluzione: 
640 x 350 pixel a 16 colori da una tavolozza 
di 64) anch’esso adattabile come posizio¬ 
ne, o un monitor VGA da 14" (monocroma¬ 
tico o a colori) con un controller VGA a 8 o 
16 bit. Entrambe le schede VGA sono com¬ 
patibili MDA, CGA, MGA e EGA. In questo 
caso la risoluzione è di 16 fra 263.144 colori 
con una risoluzione di 640 x 480 pixel. 
L’interfaccia grafica MS-Windows/386, che 
è parte integrante del sistema Tandon 
386/33, garantisce all’utente una reale pos¬ 
sibilità di uso contemporaneo di più pro¬ 
grammi e fa di questo computer al vertice 
della gamma Tandon un prodotto ideale 
come server di rete. 

Il Tandon 386/33, naturalmente, è compati¬ 
bile con i sistemi operativi MS-DOS, OS/2, 
UNIX, Novell, oltre che con altri sistemi ope¬ 
rativi e di rete. Il sistema comprende il sof¬ 
tware MS-DOS 3.3, il Microsoft GW-BASIC 
oltre che le Data Pac-Utilities e tutti i relativi 
manuali. 

Con l’opzione In-Pac, che include il control¬ 
ler RLL Tandon con memoria cache da 64 


KB per accesso rapido ai dati, il “mainfra¬ 
me in un contenitore da personal” è com¬ 
patibile con lo standard innovativo del Per¬ 
sonal Data Pac (il disco rigido rimovibile 
brevettato dalla Tandon). Questo significa: 
risorse di memoria di massa praticamente 
illimitate, nessun compromesso sull’integri¬ 
tà dei dati e sicurezza di funzionamento 
grazie alla completa portabilità e mobilità di 
programmi e applicazioni; e tutto questo a 
un livello di prestazioni fino ad ora mai rag¬ 
giunto. 

Tandon Computer S.p.a. 

Via Enrico Fermi 20 
Milano 


L QUAD VGA EL 

La Tradinform S.r.l. distributrice di prodotti 
informatici finiti ad alto contenuto tecnolo¬ 
gico, presenta sul mercato l’ultima novità 
della casa statunitense Quadram, produt¬ 
trice di sofisticate schede e di monitor pro¬ 
fessionali per personal computer IBM e 
compatibili. 

La Quad VGA EL si pone come un vero e 
proprio “entry level” degli adattatori video 
VGA. Costruita interamente negli Stati Uniti, 
a garanzia di altissima tecnologia, e con 
criteri costruttivi di estrema pulizia ed accu¬ 
ratezza, la Quad VGA EL soddisfa le esi¬ 
genze più raffinate di un utenza che ha bi¬ 
sogno di VGA di grande qualità con un co¬ 
sto assolutamente competitivo e contenuto. 
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PHILIPS 


POTERE PERSONAL 



PHILIPS 


PHILIPS 


NMS TC 100 


NUOVO VELOCISSIMO PHILIPS TC100 


IL COMPATTO E VELOCE NMS TCIOO 

Memoria RAM 512 KB espandibile a 640 KB; proces¬ 
sore 8088 con velocità di clock commutabile da 4,7 a 
10 MHz; scheda grafica compatibile Hercules e CGA. 
Disponibile in tre configurazioni. 

NMS TC 100 - 1 FDD 720 KB, 3.5" 

compreso monitor monocromatico_L 999.000' 

NMS TC 100 - 2 FDD 720 KB, 3.5" 

compreso monitor monocromatico _ L. 1.299.000* 

NMS TC 100 -1 FDD 720 KB + 1 HD 20MB 
compreso monitor monocromatico L 1 699.000’ 

I VERSATILI PC XT 

Processore 8088 con velocità di clock selezionabile 
tra 4,7 e 8 MHz; memoria RAM 768 KB (512 KB per il 
solo NMS 9105); cinque slot di espansione; scheda 
grafica compatibile Hercules, CGA, MDA e Plantro- 
nics disponibile in quattro configurazioni: NMS 9105 
un floppy disk drive 3.5" 720 KB di capacità; NMS 


9110 due floppy disk drive 3.5”; NMS 9111 un floppy 
disk drive 3.5" e uno 5.25" 360 KB; NMS 9115 un 
floppy disk drive e un hard disk da 20 MB. 

I PC PROFESSIONALI AT 

Processore 80286 funzionante a 8 e 10 MHz; memo¬ 
ria RAM 640 KB espandibile a 2,5 MB. Disponibile in 
due configurazioni: NMS AT 25 un floppy disk drive 
5.25" 1,2 MB di capacità, hard disk da 20 MB; sche¬ 
da grafica compatibile Hercules, CGA, MDA e Plan- 
tronics; NMS 9130 un floppy disk drive 3.5" 1,44 MB 
di capacità, hard disk da 45 MB; scheda grafica EGA. 

LE STAMPANTI 

Una vasta gamma per tutte le esigenze; dalla piccola 
stampante ad aghi NMS 1432. 80 colonne, 120 carat¬ 
teri al secondo, alla prestigiosa stampante laser NMS 
1480 da sei pagine al minuto; attraverso un vasto ran- 
ge da 80 a 136 colonne, da 120 a 240 caratteri al se¬ 
condo, da 9 a 24 aghi. 


I MONITOR 

Philips leader del mercato offre un vasto range di mo¬ 
nitor monocromatici e colore da 12” a 20" compati¬ 
bili con le schede Hercules, CGA, EGA, VGA, appli¬ 
cazioni desk top publishing e CAD CAM. 

PERSONAL COMPUTER MS-DOS 


NMS 9110 

L. 1.650.000* 

NMS 9111 

L. 1.700.000* 

NMS 9115 

L. 2.500.000* 

NMS AT 25 

L. 3.750.000* 

NMS 9130 

L. 4.700.000* 

STAMPANTI 

NMS 1432 

L. 410.000* 

NMS 1437 

L. 540.000* 

NMS 1440 

L. 920.000* 

NMS 1441 

L. 1.100.000* 

NMS 1480 (laser) 

L. 3.500.000* 


'IVA ESCLUSA 
























NOTIZIARIO 


Dal punto di vista strettamente tecnico, la 
Quad VGA EL offre una compatibilità del 
100%. Dotata di bus a 8 bit, è compatibile 
con i personal computer IBM XT e AT com¬ 
patibili; ed è in grado di supportare solo 
monitor analogici, VGA e Multiscan in mo¬ 
do VGA. 

La sua installazione è semplicissima, non ci 
sono switch o jumpers da settare, basta in¬ 
serire l’adattatore in qualsiasi slot disponi¬ 
bile del vostro PC. Inoltre non è necessario 
installare alcun software: si utilizzano diret¬ 
tamente i driver VGA o EGA in dotazione 
con i pacchetti applicativi. 

Tradinform Srl 
Via Carlo Perrier 4 
00157 ROMA 



DOPO HARDCARD £ PASSPORT, 
PLUS PRESENTA IMPULSE 


L'Editrice Italiana Software annuncia Plus 
Impulse, il disco rigido più veloce e versatile 
nella classe PC LAN. Plus Impulse è rivolto 
agli utenti di applicazioni che richiedono 
una grande quantità di memoria su disco, 
ai sistemi come data base, programmi di 
contabilità, CAD, LAN e desktop publi- 
shing. 

Plus Impulse ha un tempo di accesso effet¬ 
tivo di 12 Ms e permette di collegare su un 
solo PC LAN server fino a 32 drive (cioè più 
di 2.6 Gb). 

Plus Impulse segue altri due prodotti dagli 
aspetti innovativi introdotti recentemente 
dalla Plus: si tratta del disco rigido su sche¬ 
da Hardcard e della prima memoria tra¬ 
sportabili Passport. Dopo Impulse, la Plus 
intende proseguire sulla strada dello svilup¬ 
po di prodotti ad alto contenuto di innova¬ 
zione tecnologica che stabiliranno nuovi 
standard per il settore degli hard disk. Fino 
ad oggi, per ottenere le stesse prestazioni 
offerte da Impulse, gli utenti di 286, 386 e di 
LAN dovevano rivolgersi a drive molto co¬ 
stosi nella gamma dei 150-300 Mb. 

Il sistema drive di Impulse dispone invece di 
opzioni per hard disk da 40 o 80 Mb e un 
adattatore per bus a 16 bit in grado di gesti¬ 
re 4 drive montati internamente e un totale 
di 16 drive. Vi è inoltre possibilità di collega¬ 
re più drive esternamente, alloggiandoli in 
appositi chassis esterni. 

Il nuovo disco rigido impiega una interfac¬ 
cia propietary chiamata Cluster Disk Inter¬ 
face che permette un alto livello di espandi¬ 


bili senza sacrificare la qualità delle pre¬ 
stazioni. A differenze di SCSI, CDI è in grado 
di trasferire fino a 512 byte di dati per ogni 
transazione e di operare a una velocità di 
trasferimento massima di 4Mb al secondo. 
Il tempo di accesso è diminuito drastica¬ 
mente da una architettura DisCache dotata 
di una memoria cache a 2 porte seriali di 64 
K ad alta velocità per ciascun drive. DisCa¬ 
che aumenta le prestazioni totali di Impulse 
rispetto alla struttura buffer di un drive tra¬ 
dizionale. Insieme alla memoria cache del 
disco l’Onboard Controller permette a que¬ 
sto nuovo prodotto di gestire simultanea¬ 
mente più richieste distribuite su più drive in 
un sistema operativo funzionale. Anticipan¬ 
do le richieste dei dati, DisCache utilizza 
una tecnica di preraccolta per individuare e 
memorizzare i dati successivi nella memo¬ 
ria cache. Poiché il 50 % delle richieste so¬ 
no in media sequenziali, i dati possono es¬ 
sere estratti in microsecondi anziché in mil¬ 
lisecondi. 

L’architettura di Impulse è basata su una 
tecnologia assolutamente nuova per i file 


server di PC LAN. Essa estrae vantaggio 
dalla futura generazione di ambienti di net¬ 
work multirete rappresentata da 3 +open 
per l’ottimizzazione delle performance LAN. 
Plus Impulse si propone come soluzione 
ideale per il 3 +Open LAN Manager Entry 
System. Ulteriormente potenziata per le in¬ 
stallazioni in rete locale, l'interfaccia Defect 
Free Interface elimina i settori difettosi per il 
sistema operativo, evitando la necessità di 
utilizzare il programma Compsurf (che può 
arrivare fino a 36 ore per disco da 320 Mb) 
prima di installare il drive su una rete Novell. 
Il drive è compatibile con AT IBM, Compaq 
Deskpro 286/386, Olivetti, Wyse, Ast, NCR, 
Zenit. Sono anche disponibili i drive di sup¬ 
porto a DOS, OS/2 Microsoft LAN Manager 
e Novell NetWare. Il disco rigido Impulse ha 
un tempo medio tra guasti (MTFB) intorno 
alle 50.000 ore. 


EDITRICE ITALIANA SOFTWARE 
Via Fieno 8 
20123 Milano 
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NO VITA DI PRIMA VERA 

REPORTAGE SULLE NOVITÀ 
PRESENTATE Al SALONI DI STAGIONE 

di STEFANO MAJOCCHI 


Il settore informatico è in costante svilup¬ 
po , ma ci sono dei particolari periodi in cui 
le aziende presentano i nuovi prodotti ap¬ 
profittando delle manifestazioni quali il 
CeBIT e il Comdex 


jb nche questa primavera è 
é densa di innovazioni e svi- 

luppi. Non è ovviamente pos- 
sibile parlare di tutto, ma cer- 
cheremo di darvi un quadro 
della situazione parlando dei prodotti più 
rappresentativi delle nuove tendenze. 


SUPPORTI MAGNETICI 
E MEMORIE DI MASSA 


TDK 

Quando si parla di supporti magnetici, è 
inevitabile non incontrare il nome di questo 
colosso giapponese. 

Tutta l’esperienza accumulata per lo svilup¬ 
po dei nastri magnetici per registratori sia 
audio che video è stata riversata in una se¬ 
rie di floppy disk sia da 5 1/4 che da 3 1/2 
che presentano delle caratteristiche inno¬ 
vative per la tecnologia utilizzata nella rea¬ 
lizzazione dello strato magnetico. 

TDK è rinomata nel settore per l’impiego di 
particolari particelle denominate Avilyn per 
tutti i supporti magnetici pregiati; anche per 
la sua produzione di floppy la scelta è ca¬ 
duta su questo tipo di particelle, ma non 
soddisfatti del prodotto hanno sviluppato 
un nuovo metodo per l'indurimento del col¬ 
lante che ingloba appunto le particelle. 




L — 
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Il CeBIT di Hannover è uno degli appuntamenti per le novità di primavera. 
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La personalizzazione dei jacket è per la SentineI un incentivo alle vendite 
dei programmi ed anche una protezione formale contro la pirateria. 


Assieme ai normali floppy disk molte case stanno affiancando la 
produzione di dischi ottici sia WORM che Magneto Ottici (cancellabili). 


I floppy disk sono costruiti a strati e la parte 
più delicata è la superficie magnetica. 

II processo classico di indurimento è quello 
termico e TDK ha deciso di utilizzare un fa¬ 
scio di elettroni per migliorare il legame fra 
le molecole del collante. Il risultato è una 
maggiore stabilità e uniformità dello strato 
magnetico. Con l’aumentare della densità 
di registrazione dei dati diventa importante 
ia stabilità del livello di magnetizzazione 
sull'intera superficie e i grafici prodotti dalla 
TDK dimostrano la superiorità del prodotto. 
Ogni utente di computer ha la necessità di 
memorizzare particolari programmi e file su 
un supporto estremamente affidabile, scar¬ 
tando i dischetti economici per evitare brut¬ 
te sorprese; seguendo un po’ la filosofia 
dell'audio, potremmo dire che il materiale 
prezioso si merita un supporto TDK. 

ACT 

Sotto questo marchio sono commercializ¬ 
zati i floppy disk prodotti dalla G. Yean 
Electronics Technology Corporation. Il loro 
prodotto, per l’alta qualità è stato scelto co¬ 
me il Floppy Disk ufficiale per i noni giochi 
asiatici del 1990. 

Il fascino della sponsorizzazione non ha li¬ 
miti e dobbiamo ammettere che non ci 
aspettavamo di trovare un “floppy ufficia¬ 
le" per una manifestazione sportiva. 
L’impegno di questa azienda è comunque 
notevole; non soddisfatti dell’attuale tecno¬ 
logia per la produzione dell’intero floppy 
disc, hanno reingegnerizzato tutto il proce¬ 
dimento sviluppando autonomamente i 
macchinari per l’assemblaggio del prodot¬ 
to. Ogni parte del dischetto è stata riconsi¬ 
derata nei materiali per ottenere la migliore 
combinazione. 

I produttori di floppy sono, per motivi tecno¬ 
logici, divisi in due grandi categorie: quelli 
in grado di produrre il supporto magnetico 
e quelli che assemblano i dischi con sup¬ 


porto acquistato. Sono infatti molto poche 
le aziende che dispongono della tecnologia 
-per produrre gli ossidi e il supporto magne¬ 
tico, quindi la maggior parte delle case può 
solo impegnarsi a migliorare la qualità del 
jacket e della clamshell. 

Fuji Film 

Non poteva mancare il “floppy ufficiale” 
della coppa del mondo di calcio del ’90 sot¬ 
to il marchio Fuji. Anche questa casa non 
ha saputo resistere al fascino del floppy co¬ 
lorato e propone l’intera gamma, 5 1/4-3 
1/2 - 3 1/2 HD, in cinque tonalità pastello; 
per il formato cinque pollici è disponibile 
anche la versione HD già formattata secon¬ 
do lo standard IBM AT. 

Per il novanta quindi i dati della coppa del 
mondo saranno “a colori", speriamo che 
sia di buon auspicio. 

Maxtor 

Un nome che anche in Italia sta attirando 
l’attenzione per la produzione di hard disk e 
dischi ottici. Da un lato troviamo prodotti 
come l’hard disk tre pollici e mezzo da 201 
Megabyte formattato e dall’altra il drive otti¬ 
co per dischi magneto-ottici da 1 Gigabyte. 
La capacità di questi dispositivi sta rag¬ 
giungendo livelli impressionanti e noi pove¬ 
ri utenti rimaniamo qualche volta disorien¬ 
tati di fronte alle centinaia di Megabyte. 

La tendenza tecnologica è comunque chia¬ 
ra: gli hard disk diventano sempre più com¬ 
patti, con i 100 Megabyte considerati come 
dimensione minima, mentre i dischi ottici di 
tipo WORM ed Erasable si faranno sempre 
più largo nel settore delle memorie di mas¬ 
sa. 

Seagate 

L’hard disk necessita di diverse parti elet¬ 


troniche per poter colloquiare con il com¬ 
puter. I produttori hanno sviluppato delle 
interfacce standard quali l’SCSI, l’ST-506 ed 
altre. 

Per poter collegare l’hard disc ogni compu¬ 
ter deve però disporre di una scheda con¬ 
troller che sia dotata dell’appropriata inter¬ 
faccia. Seagate ha deciso di semplificare 
ulteriormente la situazione incorporando 
direttamente sull’hard disc l’interfaccia ed il 
controller per i computer AT e compatibili. 
La nuova linea con interfaccia AT è compo¬ 
sta da tre modelli da 21,32 e 43 Megabyte a 
28 o 40 millisecondi di tempo d’accesso. 

Wangtek 

Le sorti del Digital Audio Tape (DAT) sono 
state, per il momento, infauste per il settore 
Hi-Fi mentre l’impiego della stessa tecnolo¬ 
gia nel settore informatico sta invece ri¬ 
scontrando molto interesse. Il formato delle 
cassette e la capacità sopra il Gigabyte, as¬ 
sieme alla velocità di trasferimento che va 
dai 200 K ai 5 Mega byte al secondo rendo¬ 
no i sistemi di backup basati su questa tec¬ 
nologia vincente per molte applicazioni. 
Wangtek propone quindi un drive DDAT 
(Data DAT) capace di memorizzare 1,3 Gi- 
gabites in soli 60 metri di nastro da quattro 
millimetri. 

In questo caso è stata sviluppata una nuo¬ 
va meccanica per l’utilizzo di nastro più sot¬ 
tile in collaborazione con la JVC. L’interfac¬ 
cia SCSI garantisce l’integrazione di questo 
nuovo dispositivo senza particolari proble¬ 
mi. 

Mountain Computer Ine. 

Un altro DAT trasformato in unità di bac¬ 
kup è il Series 2100. 

Su una cassetta con nastro da 8 millimetri 
possono essere memorizzati fino a 2,2 Gi¬ 
gabyte di dati. 
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Anche per questo prodotto l’interfaccia è 
SCSI con un transfer rate di 13 megabyte al 
minuto. 

La Mountain Computers è da tempo sul 
mercato dei sistemi di backup e i suoi pro¬ 
dotti sono corredati del programma FileSa- 
fe, uno standard de facto per la gestione 
dei sistemi di backup. 

Un prodotto di queste prestazioni trova la 
sua collocazione nel crescente mercato 
delle reti di PC. 

Chinon 

I possessori di Amiga dovrebbero conosce¬ 
re questo nome dato che i drive da 3 pollici 
e mezzo montati nei loro computer sono 
quasi sempre prodotti da questa casa. 

La Chinon è nota per i suoi prodotti a basso 
costo e dopo la fruttuosa esperienza nel 
settore dei drive per floppy disk ora cerca di 
dare il suo contributo alla diffusione dei 
CD-ROM con il drive CDS-430. A circa un 
milione di lire è possibile acquistare questo 
dispositivo che non solo si interfaccia ai 
computer IBM e compatibili, ma ha anche 
un’uscita audio stereofonica per l’ascolto 
di CD musicali. 

La capacità dei CD-ROM codificati secon¬ 
do i metodi Sony e Philips è di circa 550 Me¬ 
gabyte e l’unità e fornita su richiesta con il 
software di controllo, sviluppato da Micro¬ 
soft sotto il nome di MS-DOS CD ROM Ex- 
tension. 

Anche con i CD Audio è possibile controlla¬ 
re il funzionamento dell’unità da PC. 

Mitsui 

La Mitsui è un’azienda leader nel settore 
della petrolchimica in Giappone e non di¬ 
sdegna gli investimenti in settori particolari 
quali la biotecnologia, la ricerca nei mate¬ 
riali compositi e lo sviluppo di nuovi mate¬ 
riali per l’elettronica. Da queste ricerche è 
nato un nuovo substrato per i dischi ottici. 
La densità dei dati determina la necessità 
di un supporto che non risenta dell’umidità, 
degli stress meccanici e della temperatura. 

II polyolefine amorfo (APO) è il nuovo mate¬ 
riale che ha stimolato la Mitsui a produrre 
dischi ottici WORM ed Erasable e un drive 
per WORM. 

Oltre ai semplici drive e dischi questa casa 
propone anche un kit per PC composto da 
un drive WORM da 800 Megabyte, una in¬ 
terfaccia per PC XT e AT e un software per 
la gestione. 


Per l’utente è come avere un drive esterno 
grazie alla compatibilità del sistema con il 
DOS. La velocità di trasferimento dei dati è 
di 100 Kbyte al secondo e il tempo di acces¬ 
so è di circa 120 millisecondi. 

Il software di gestione dei file provvede ad 
aggiornare costantemente la directory visto 
che i dati non possono essere fisicamente 
cancellati o sovrascritti. 

Xidex 

Dalla combinazione del disco magnetico e 
del disco ottico nasce un nuovo tipo di sup¬ 
porto: il Floptical Disk. Un normale dischet¬ 
to da tre pollici e mezzo è in grado di memo¬ 
rizzare fino a due megabyte con una densi¬ 
tà di 135 tracce per pollice. 

Il problema che si incontra quando si vuole 
incrementare la densità di registrazione stà 
nella difficoltà di posizionare con precisio¬ 
ne la testina rispetto alla traccia. La società 
americana Insite ha sviluppato un nuovo ti¬ 
po di drive che utilizza una marcatura otti¬ 
ca delle tracce per il posizionamento della 
testina; questo porta la densità delle tracce 
a 1250 per pollice con un conseguente in¬ 
cremento di capacità a 20 Megabyte for¬ 
mattati. 

I vantaggi di questa tecnologia sono diver¬ 
si: innanzitutto il supporto magnetico rima¬ 
ne pressoché inalterato nelle sue caratteri¬ 
stiche, poi anche il drive risulta abbastanza 
economico (circa settecentomila lire al 
pubblico) e non differisce sostanzialmente 
dai prodotti attualmente disponibili, infine è 
possibile aspettarsi un incremento di capa¬ 
cità fino ai 100 Megabyte nei prossimi due 
anni. 

La Xydex ha deciso di collaborare dando il 
via alla produzione dei dischetti che nel ci¬ 
clo produttivo sono sottoposti solo ad un 
trattamento aggiuntivo in una macchina 
che “scrive" permanentemente le tracce ot¬ 
tiche. 

Si tratta in pratica di un nuovo ibrido tecno¬ 
logico che da una parte ricorda gli hard 
disc a supporto estraibile e dall’altra i dischi 
ottici. 

Certamente questa tecnologia ha dalla sua 
parte il basso costo sia del drive che dei di¬ 
schetti, quindi ha delle buone chance per 
vincere la partita dei “superdrive". 

STAMPANTI 


QMS 

La sigla DTP è ormai familiare a tutti ed il 
mercato informatico sta vivendo l’apertura 



La prima stampante a colori compatibile 
PostScript è della QMS. Non molto 
compatta, ma perfetta nella stampa. 


di questo nuovo segmento con un continuo 
susseguirsi di prodotti. 

L’evoluzione dell’editoria elettronica è mol¬ 
to rapida, con particolare riferimento al sof¬ 
tware che ha visto la comparsa di pacchetti 
sempre più sofisticati. 

Anche le stampanti, spesso elemento criti¬ 
co della catena DTP, stanno cercando di 
tenere il passo. 

È il caso della ColorScript 100, la prima 
stampante a colori dotata di PostScript 
Adobe. Le prestazioni di questa macchina 
sono: stampa a colori in formato A4 (mo¬ 
dello 20) e A3 (modello 30), PostScript Ado¬ 
be, 35 fonti residenti, 4 Megabyte di RAM e 1 
Megabyte di ROM. 

Un processore 68020 a 16.67 MHz è il cuore 
del controller che può essere espanso per 
la stampa del formato A3 e completato con 
altri 4 Megabyte di RAM ed un hard disk da 
20 Megabyte per le fonti. 

Il funzionamento è a quattro passate sullo 
stesso foglio con un processo a trasferi¬ 
mento termico. 

Il risultato di stampa merita di essere visto in 
originale per la particolare precisione e bril¬ 
lantezza dei colori. 

Proprio per la resa cromatica della Color¬ 
Script 100 la QMS ha concluso un accordo 
con la Pantone per dotare la stampante di 
una tabella corrispondente ai colori del 
Pantone Matching System 747XR. 
Utilizzando i programmi che già includono 
le tabelle Pantone, come l’Adobe lllustrator 
88 o il Ready-Set-Go! Ver 4.5 è quindi possi- 
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RICORDIH/i rchimedes 


Buon lavoro, con la potenza del RISC! 



> RISC: è il principio di Archimedes, lo straordinario e velocissimo personal computer a 32 bit > Mettetelo alla 
prova con un foglio elettronico come SigmaSheet, 200 volte più rapido dei suoi simili (ricalcola un cash-flow di 32 
anni in meno di 25 secondi), o con un integrato come Pipe-dream (predisposto per comunicare con i portatili del¬ 
la nuova generazione), o con un project-manager versatile 
come Logistix, o con un database come System Delta Plus 
(che può gestire oltre due miliardi di records) I> Confrontate 
la potenza dei pacchetti di grafica, del software per appli¬ 
cazioni musicali, didattiche, scientifiche, mediche t> Valutate 
la facilità con cui sono state sviluppate soluzioni origi¬ 
nali e sofisticatissime nei vari linguaggi disponibili 
BBC Basic, Assembly, C, Pascal, Fortran 77, 

Lisp, Prolog) t> Apprezzate la possibilità di conti¬ 
nuare a utilizzare tranquillamente i 
vostri pacchetti MS-DOS pre¬ 
feriti t> Mai un computer 
così nuovo e rivoluzionario 
ha avuto tanto software 
così presto > Ed è solo il 
principio. 


Cognome: 

Qualifica professionale: 


Ditta, Ente o Scuola: 


Indirizzo: 




Distributore esclusivo: 


G. RICORDI &C. 
Settore Informatico 
Via Salomone, 77 
20138 MILANO 
tei. 02/5082-315 


er maggiori informazioni, inviate questo coupon a G. RICORDI & C 
Settore Informatico, Via Salomone, 77, 20138 MILANO 

Desidero avere maggiori informazioni su Archimedes 

Nome: 
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Entwicklung der 
Geràteabmessur 
bei gleìcher 
Speicherkapazìti 


In dieci anni le dimensioni degli hard disc sono diminuite notevolmente, la Fujitsu ci offre questa 
“collezione ” per dimostrare i progressi tecnologici compiuti in questo settore. 


bile avere il bozzetto in quadricromia con la 
resa cromatica praticamente perfetta. 

Per chi invece non può usufruire della co¬ 
modità del PostScript su laser printer, QMS 
propone una emulazione software in grado 
di convertire una pagina PostScript in una 
immagine ad alta risoluzione stampabile in 
grafica dalla Laser Printer. Il pacchetto si 
chiama UltraScript PC; pilota tutte le stam¬ 
panti ad aghi compatibili Epson LQ, IBM 
Proprinter, HP DeskJet e Canon Bubble-Jet 
e le stampanti laser compatibili HP LaserJet 
e HP-PCL. 

La generazione deirimmagine raster richie¬ 
de un computer di medie prestazioni, 286 o 
386, con almeno 640K RAM, 3 MB liberi su 
hard disk ed un drive da 1,2 MB. Anche se 
questa soluzione software non brilla per ra¬ 
pidità, è pur sempre una valida alternativa 
ad una stampante PostScript per il suo co¬ 
sto ridotto. 

Star Micronics 

Mentre molte case produttrici di stampanti 
hanno deciso di inserire a catalogo le La¬ 
ser, la Star Micronics ha pensato di propor¬ 
re una stampante ad aghi capace della 
Near-Laser-Quality o Super-Letter-Qualitiy 
con una matrice da quarantotto per trenta- 
cinque punti. La testina di stampa è a venti- 
quattro pin, ma utilizzando la doppia pas¬ 
sata con un piccolo spostamento verticale 
della carta, la risoluzione è stata raddop¬ 
piata. Le stampanti della linea XB sono per 
la Star Micronics il prodotto giusto per en¬ 


trare nel mercato degli uffici: molta cura è 
stata posta a livello progettuale per la ridu¬ 
zione della rumorosità e la semplicità d’uso. 
Ogni fonte può essere stampata in modo 
outline o shadow e delle cartucce in forma¬ 
to “carta di credito” permettono di espan¬ 
dere le sedici fonti residenti secondo le pro¬ 
prie necessità. 

Con una sola stampante è quindi possibile 
avere la stampa a 240 cps in draft, a 80 cps 
in NLQ e a 40 cps in SLQ. 

La serie monocromatica verrà presto af¬ 
fiancata da quella a colori espandendo ul¬ 
teriormente le prestazioni delle stampanti di 
questa casa, già nota a tutti gli hobbisti per 
i suoi prodotti economici e funzionali. 

Kyocera 

La già nutrita famiglia di Laser Printer di 
questa casa giapponese si arricchisce di 
un nuovo modello che, grazie al processore 
68020, offre una maggiore velocità di ela¬ 
borazione delle pagine rispetto al modello 
precedente dotato di 68000. 

Kyocera è una di quelle case che cerca di 
rivaleggiare l’invasione PostScript con un 
linguaggio descrittivo di pagina compatibi¬ 
le. Il costo della licenza Adobe è infatti per i 
produttori un punto che spesso compro¬ 
mette la competitività del prodotto. Il lin¬ 
guaggio “alternativo a PostScript” svilup¬ 
pato da Kyocera si chiama KPDL (Kyocera 
Page Description Language. La stampante 
P-2000 è in grado di stampare 10 pagine al 
minuto e contiene, oltre al KPDL, numerose 


emulazioni fra cui HP-LaserJet serie II, IBM 
Graphics Printer, Diablo 630 ed Epson 
FX80. Rispetto alle stampanti PostScript la 
Kyocera offre anche le emulazioni Epson e 
HP che permettono di utilizzare la sua La¬ 
ser non solo per Desk Top Publishing, ma 
anche per il CAD e le altre normali applica¬ 
zioni su PC. 

Per quanto è stato possibile verificare, il 
KPDL ha una compatibilità quasi del 100% 
con PostScript. Per chi invece non desidera 
il PostScript c’è la nuova stampante F- 
2200S che offre una maggiore velocità ri¬ 
spetto al modello precedente grazie al pro¬ 
cessore 68020 che rimpiazza il più lento (!) 
68000; anche l’espandibilità RAM aumenta 
da 2 a 4 Megabyte. 

Office Automation Systems 

Continua l’assalto al PostScript: questa ca¬ 
sa americana propone per la sua serie di 
stampanti LaserPro una cartuccia che in¬ 
vece di contenere delle fonti aggiuntive 
contiene un interprete 100% compatibile 
PostScript che trasforma la stampante in 
una Laser Writer. A differenza della stam¬ 
pante Kyocera, l’interprete è su cartuccia e 
quindi può essere attivato solo quando ser¬ 
ve ed eventualmente usato su più stampan¬ 
ti (non contemporaneamente). 

Un’idea intelligente che permette l’upgrade 
a ProScribe (da non confondere con il lin¬ 
guaggio PreScribe Kyocera) senza dover 
installare schede aggiuntive e a un costo 
più ridotto. 

Fujitsu 

Costa circa sette milioni e mezzo, stampa a 
300 punti pollice, ha l’interprete PostScript 
Adobe, emula la HP LaserJet, ma non è una 
Laser Printer... 

È la RX7100PS Fujitsu, una stampante che 
utilizza un nuovo metodo per il trasferimen¬ 
to delle immagini sul tamburo fotosensibile. 
Invece del complicato sistema a laser che si 
basa su specchi in rotazione, questa stam¬ 
pante usa un array di diodi elettrolumine¬ 
scenti (LED) che sono di costo inferiore e di 
più facile assemblaggio. L’importanza di 
questa innovazione tecnologica, adottata 
peraltro anche da altri costruttori quali la 
NEC, potrà contribuire ad abbassare il co¬ 
sto delle page printer a toner senza deterio¬ 
rare la risoluzione. 

A circa sette milioni è quindi possibile ac¬ 
quistare la RX7100PS, stampante Post¬ 
Script e HP LaserJet compatibile, con 2 Me- 
ga di RAM, dotata di doppio alimentatore di 
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fogli e capace di stampare cinque pagine al 
minuto. 

Brother 

Dalle piccole stampanti termiche alle stam¬ 
panti laser, si estende la gamma delle peri¬ 
feriche offerte da questa casa nipponica 
che dimostra ancora una volta di essere 
sensibile alle necessità del mercato mon¬ 
diale delle stampanti. In molti ci ricordiamo 
delle prime macchine per scrivere portatili e 
forse qualcuno sta usando con il suo Z88 
l’ottima stampante da 80 colonne a pile di 
questa casa. Ma di evoluzioni ce ne sono 
state parecchie: ora anche Brother dispone 
di stampanti a ventiquattro aghi (anche in 
versione colore) e di Laser Printer. Il model¬ 
lo M-1824L (24 aghi) è addirittura capace di 
337 cps in draft e scende ai comunque rag¬ 
guardevoli 80 cps; in modo grafico questa 
stampante raggiunge i 360 punti pollice ed 
il kit aggiuntivo CK-100 permette di ottenere 
anche stampe con i quattro colori nero, 
giallo, magenta, ciano e le loro combinazio¬ 
ni. 

Per le soluzioni Laser anche quest’azienda 
offre sia l’emulazione HP LaserJet che il 
PostScript; il modello più completo è dispo¬ 
nibile a circa sette milioni. 

Seiko 

Capita spesso che in questo settore com¬ 
paiano dei nuovi prodotti, anche innovativi, 
realizzati da case che mai o raramente si 
erano avvicinate direttamente al settore 



In D-SCAN è la proposta Seiko per l’output su 
carta di immagini a colori generate da computer. 



dell'informatica. Il nome Seiko infatti ricor¬ 
da gli orologi digitali, eppure presto in mol¬ 
te aziende comparirà un dispositivo per la 
stampa a colori ad alta risoluzione delle vi- 
deate grafiche create da sistemi come le 
workstation Sun o PC386 in diretta compe¬ 
tizione con le apparecchiature Tektronix e 
HP. 

La serie D-SCAN è composta da due stam¬ 
panti, A3 e A4, ed un printer server per il col- 
legamento in rete. La tecnica utilizzata è di 
tipo termico e le immagini sono particolar¬ 
mente brillanti per il tipo di inchiostro utiliz¬ 
zato che è simile alla cera. La risoluzione è 
di trecento punti pollice con una gamma di 
colori pressoché illimitata utilizzando il si¬ 
stema della retinatura sui quattro colori ne¬ 
ro, magenta, giallo e ciano. 

Un pochi minuti il D-SCAN trasferisce 
un’immagine ad alta risoluzione su carta 
con lo stesso sistema visto anche nella 
QMS ColorScript 100: il foglio viene stampa¬ 
to prima con il giallo, poi con il ciano, il ma¬ 
genta ed infine il nero. Il trascinamento del¬ 
la carta è estremamente preciso anche se 
su tratta di fogli singoli e nelle varie prove 
viste non abbiamo riscontrato nessun fuori 
registro o sbavatura. 

COMPUTERS 


Commodore 

Due nuovi prodotti e due soluzioni applica¬ 
tive sono le novità che Commodore propo¬ 
ne per questa primavera: l’attesa postazio¬ 
ne UNIX, nota anche come Amiga 2500, un 
hard disk da 20 Megabyte con Lina RAM 


board da 2 Megabyte per Amiga 500, una 
postazione per Desk Top Publishing e una 
per Desk Top Video. 

Le capacità di multitasking di Amiga si 
espandono notevolmente con il modello A 
2500 UX che combina la potenza di un 
68020 al coprocessore 68881 con un clock 
da 14,2 MHz ad un hard disk da 80 Megaby¬ 
te e 3 Megabyte di RAM. Si tratta di una vera 
e propria workstation Unix che raffrontata 
all’A2000 ha una performance superiore 
del 400%. Seguendo gli standard di merca¬ 
to, questa unità dispone anche di un drive a 
nastro da 150 Megabyte per il backup dei 
dati. La versione di Unix fornita è la Unix Sy¬ 
stem V. 

Per chi invece si accontenta del piccolo 
A500 è finalmente disponibile l’espansione 
A590 che combina un hard disk da 20 Me¬ 
gabyte a una scheda di espansione RAM 
della capacità di 2 Megabyte. Come ag¬ 
giunta è stata anche implementata l’utilissi¬ 
ma interfaccia SCSI che permette il collega¬ 
mento di numerosi altri dispositivi fra cui 
hard disk esterni, CD-ROM e dischi ottici. 
Come applicazioni la Commodore ha pen¬ 
sato di proporre DTP e DTV per rispondere 
alle crescenti richieste del mercato. 

Il DTP è basato su un A 2000, un hard disk 
da 40 Megabyte, 3 Megabyte di RAM, una 
Laser Printer PostScript della Nec, uno 
scanner da 300 dpi a colori ed il formidabile 
Professional Page che rivaleggia i più affer¬ 
mati PageMaker e Ventura del mondo Mac 
e IBM. 

Più economica invece la soluzione Video 
che utilizza un A500 con il “Videobox” e i 
più affermati pacchetti per DTV. Il nuovo 
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Desk Top Publishing e Desk Top Video sono le due nuove applicazioni proposte da Commodore per 
l'Amiga 500 e 2000. 


serie più piccola, denominata 700 monta un 
68020 con coprocessore 68881 ed è propo¬ 
sta come stazione da collegare in rete ai 
modelli più potenti dato che è compieta- 
mente sprovvista di floppy o hard disk. Con 
la serie 1700 già abbiamo il 68030 e il 68882 
a 25 MHz con 4 Mega di RAM e 168 Mega di 
hard disk. Il modello di punta, l’NWS-1930 è 
un piccolo mostro: due (2 !) 68030 (CPU e 
I/O) e un 68882 a 25 MHz, 16 Mega di RAM, 
286 Mega di hard disk e tutte le interfacce 
immaginabili. Il sistema operativo News-OS 
è composto da UNIX BSD 4.3, X Windows 
1.1 e NFS 3.2. A queste workstation posso¬ 
no essere accoppiati numerosi display che 
vanno dal bianco e nero verticale da 15” al 
superbo Trinitron colore da 20” con 1280 
punti per 1024. 

Assieme alle macchine Sony propone an¬ 
che un nutrito catalogo di applicazioni 
UNIX che privilegiano grafica e Desk Top 
Publishing (di alto livello); fra le interfacce 
disponibili figura anche il disco ottico ed 
una scheda per la cattura di immagini a co- 


hardware “Videobox" è composto da un 
Genlock. un digitalizzatore ed un RGB spk- 
ter. Il prezzo annunciato in germania p-r 
questa configurazione è di circa un milio- e 
e duecentomila lire. 

Amstrad 

Con il PC2386 non poteva mancare • é 
1 OS/2 né UNIX e per questa primavera o 
slogan Amstrad è “Il P€ numero 1 pur 
UNIX”. 

Per orestazioni e prezzo abbiamo effettiv t- 
mente di fronte la soluzione "ufficiale" p u 
interessante e questo porta Amstrad ad at¬ 
taccare un segmento di mercato più eleva¬ 
to. 

Seguendo le tradizioni non c’è nessun nu >- 
vo prodotto in vista e tutti gli sforzi della ca¬ 
sa britannica sono concentrati sull’affer¬ 
mazione dei prodotti presentati allo scorso 
SMAU. 

Sony 

Non si tratta di un MSX II, ma di una serie di 
workstation UNIX estremamente potenti. La 
linea NEWS offre le soluzioni tecnologiche 
più avanzate sotto il marchio SONY che per 
noi italiani era rimasto legato ai piccoli ho- 
me computer. 

Una sorpresa inaspettata che ci svela m l- 
to sulla politica di questo colosso giappo¬ 
nese. Ma lasciamo parlare i dati tecnici per 
darvi un’idea di questa linea di prodotti: la 



Il PC2386 dell'Amstrad si propone sia per l'OS/2 che per UNIX. 


LIST 6/89 


19 










Gandin&Ai 



Bonduuell 


caricabile integrato e schermo 
illuminato ad alta definizione, 


nitor monocromatico o a colon" e 
hanno MS-Dos®, GW Basic R e 
Word Processor in dotazione. 


BONDWELL ITALIA s.r.l. - Via Canto, 19 - 20092 CINISELLO BALSAMO (MI) - Tel. (02) 660 11 212 (r.a.) - Fax (02) 660.11.328 



Bondwell B 300. AT compatibile, 

velocità 10 Mhz, memoria espandibile 

fino a 1.5 megabyte, hard disk da 20 


megabyte e microfloppy da 1.44 Mb. 
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lori da telecamera e videoregistratore. 
Attendiamo con curiosità i prezzi ufficiali. 

Toshiba 

La co r sa tecnologica di questa casa, nota 
ce r ia sua produzione di portatili basati sul- 
mtera gamma di processori della famiglia 
80 Intel, continua inarrestabile con la pre¬ 
sentazione di tre nuovi prodotti, attualmen¬ 
te ancora allo stato di prototipo. 

Il primo non poteva che essere un PC porta¬ 
tile con schermo a colori VGA compatibile 
casato sulla tecnologia LCD. Il display uti¬ 
lizzato ha una matrice da 640 x 480 punti 
con una diagonale di 11 pollici, e può vi¬ 
sualizzare sedici diversi colori. Si tratta for¬ 
se del primo display a colori LCD di queste 
dimensioni. 


Tornando ai prodotti definitivi troviamo al¬ 
cune novità dedicate al crescente mercato 
delle reti: due server basati su 386, i T8500 
modello 20 e modello 25 con rispettivamen¬ 
te 100 e 200 Megabyte di hard disk e le 
schede compatibili Ethernet. Il formato di 
queste ultime è “half-card” per permettere 
il montaggio su tutta la serie dei laptop at¬ 
tualmente prodotti da Toshiba che, con 
questa soluzione, vuole introdurre il con¬ 
cetto di “stazione-mobile”. 

Hitachi 

Per chi non riesce ad attendere la produ¬ 
zione del laptop Toshiba con monitor a co¬ 
lori LDC da 11 pollici esiste una soluzione 
intermedia: l’Hitachi HL400C. Si tratta del 
primo laptop con schermo a colori (6,3 pol- 
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La Toshiba ha presentato al CeBit89 di Hannover; questo server T8500 modello 25 dedicato al 
crescente mercato delle reti. 


Non soddisfatta Toshiba, in collaborazione 
con IBM, ha anche sviluppato un secondo 
display da 14 pollici, sempre a 16 colori, con 
una risoluzione di 720 x 550 punti che au¬ 
menta a 1440 x 1100 punti se utilizzato in 
bianco e nero. 

Il terzo prototipo riguarda un controllore 
grafico 3-D capace di disegnare con una 
velocità di 10 milioni di pixel al secondo; nei 
piani di Toshiba c’è già una workstation 
grafica basata su questo controller per en¬ 
trare nel mercato del CAD. 


lici) LCD disponibile sul mercato. La risolu¬ 
zione del display è da 640 x 200 punti e può 
visualizzare venticinque linee dauaranta o 
ottanta caratteri. 

L’HL400 è anche disponibile con un di¬ 
splay, sempre LCD, monocromatico ad un 
prezzo sensibilmente inferiore; la CPU uti¬ 
lizzata è un 80286 a 12 MHZ con la RAM su 
scheda espandibile fino a due Megabyte (1 
MB di serie). Il solito hard disk da 20 MB e 
un drive da tre pollici e mezzo completano 
questo AT compatibile. Il prezzo per il mo- 


BONDWELL. 

SISTEMI 

PER PROGRAMMI 
AMBIZIOSI. 

Bondwell risponde a ogni esigenza con una gamma 
completa di prodotti ad alta tecnologia: 

I Portatili. BW 8T - BW 8TH - BW B300. 

I Personal. BW 28 - BW 38 - BW 39 - BW B630. 
Una scelta completa di PC e AT professionali. 

II Videotelefono. BW VT91. Il primo sistema di teleco¬ 
municazione di immagini collegabile al PC. 

IL PC-Fax. BFAX 100. Il primo collegabile direttamen¬ 
te al computer per un nuovo modo di gestire le comu¬ 
nicazioni. 

Centri di distribuzione: 

BARI: Disitel. Tel. (080) 33.05.10 • BERGAMO: 
Delta, Tel. (035) 24.92.64 • BOLOGNA: Audiotecno, 
Tel. (051) 45.07.37 • CAGLIARI: Pac. Tel. (070) 
66.90.96 • ENNA: Italsoft. Tel. (0935) 69.25.60 • 
LIVORNO: Dee, Tel. (0586) 89.12.92 • MILANO: 
Domatica, Tel. (02) 612.00.67 • MILANO: Genidata, 
Tel. (02) 805.09.08 • NAPOLI: R.P.S.. Tel. (081) 
771.27.28 • PORDENONE: Fascianella. Tel. (0434) 
266.77 • ROMA: Discom. Tel. (06) 520.78.39 • 
TORINO: G.S.T.. Tel. (Oli) 220.26.51 • VERONA: 
Telestore 2, Tel. (045) 54.10.51 


Bondwell offre 12 mesi di garanzia e un servizio qualificato 
con una rete di 52 centri di assistenza diffusi in tutta Italia. 
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Per ricevere ulteriori informazioni e la documentazione 
su prodotti e punti di vendita, telefonare o scrivere a: 
BONDWELL ITALIA s.r.l. - Servizio Marketing - Via 
Cantò, 19 - 20092 CINISELL0 BALSAMO (Milano) - 
Tel. (02) 660.11.212 (r.a.) - Fax (02) 660.11.328. 


Desidero ricevere una documentazione sui vostri prodotti. 

□ PORTATILI 

□ PERSONAL 

□ VIDE0TELEF0N0 

□ PC-FAX 

Nome e Cognome 


Indirizzo 

N" 

Città 

C.A.P. 

Telefono 
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Le schede compatibili Ethernet sono montate su 
tutta la serie dei Laptop Toshiba. 



Il velocista dei cloni: 33MHw di clock e un 
Landmark di 51 MHZ. 


dello a colori è di circa otto milioni e mezzo. 
Cloni 

Alti, bassi, piccoli, grandi, a pezzi e comple¬ 
ti, la panoramica dei cloni IBM è sempre più 
vasta. La provenienza è quasi sempre asia¬ 
tica e ormai sono in produzione schede che 
rivaleggiano tranquillamente i prodotti del¬ 
le case più affermate. 

Dopo aver risolto il problema del BIOS, ap¬ 
poggiandosi a tre case (AMI, Phoenix e 
Award), gli asiatici si sono dedicati alla co¬ 
struzione di PC sempre più compatti e velo¬ 
ci. I prezzi sono ovviamente a livelli quasi ri¬ 
dicoli e una scheda XT da 10 MHz (SOLO la 
scheda) si può trovare a circa 50 dollari. In 
pratica per le configurazioni più piccole co¬ 
sta quasi di più l’alimentatore e il box del 


PC stesso. 

Per questi prodotti la lotta è condotta a 
suon di Landmark e il record è attualmente 
detenuto (con un funzionamento affidabi¬ 
le) da un PC 386 a 33Mhz che il test Land¬ 
mark valuta a 51 Mhz. Il termine 0-Wait-Sta- 
te è ormai stampigliato su tutti i depliant 
mentre i poveri processori Intel vengono 
fatti funzionare spesso oltre i limiti dichiara¬ 
ti. 

Sono tutti prodotti che suscitano interesse, 
ma solo i prodotti più affidabili giungono 
sul nostro mercato sotto il controllo di 
aziende che oltre all’hardware offrono an¬ 
che l’assistenza. 


Ogni volta che ci capita di sfogliare i gior¬ 
nali del settore di Taiwan o Singapore sia¬ 
mo tentati di costruirci il nostro “superPC”, 
ma l’eccessiva abbondanza di eclatanti 
performance ci riporta quasi sempre con i 
piedi per terra. 

Lo spirito che anima questi produttori è 
spesso quello della vendita a tutti i costi e 
qualche volta si possono anche vedere 
esempi di ingenuità nel tentativo di arricchi¬ 
re il prodotto: alcune case produttrici di ca¬ 
binet, esaurite le idee per spie e interruttori 
hanno pensato di inserire un orologino a 
cristalli liquidi completamente indipendente 
dal PC “tanto per riempire un buco”. 


LE MIGLIORI UTILITÀ AMERICANE PER COMPUTERS 


IBM PC, XT, AT, PS/2, OLIVETTI, COMPAQ, AMSTRAD E TUTTI I COMPATIBILI* 

SOLO PROGRAMMI ORIGINALI CON GARANZIA 
UFFICIALE DEL PRODUTTORE 

I prezzi indicati comprendono IVA e spese postali franco. 


PCSG-LUCID 3D (offerta promozionale L. 300.000) L. 390.000 
PC Magazine Award for Technical Excellence (USA) • 12/1987. 

Primo loglio elettronico tridimensionale resi¬ 
dente in memoria: intercambiabilità dei dati in qual¬ 
siasi applicazione, numerazione europea, files 
compatibili 123, calcolo velocissimo, prestazioni 
solisticate e straordinarie possibilità strutturali. 
Ogni cella può contenere un intero foglio di calcolo, o pagine di testo, 
entrambi accessibili con un tasto. Menus. Funzioni, Macros totalmente 
assistiti. Finestre (9 fogli di calcolo sullo schermo), Notepad. Clipboard, 
Calcolatrice. Editore. Limitato solo dalla capacità del disco fisso. 

TAKECHARGEL. New! (offerta lancio L. 185.000) L. 245.000 
Da solo, fa tutto ciò che fanno assieme dieci tra le più note 
utilità. Residente in memoria (soltanto 20 K), l’unico funzio¬ 
nante con programmi giganti, contiene tutte le utilità di cui si 
fa sempre uso! (software 600 K). 

PAUL MACE UTILITIES New Release (oltre i 32Mb) L. 196.000 
Insostituibile per il recupero dei files dopo formattazione accidenta 
le del disco fisso, «disastri» hardware o software. Virus, ecc. 3 dischi 
con dBFix. 17 utilità senza paragoni. Elette The Best of thè Year 
1987 (USA e Francia). 

PAUL MACE UTEST/hFORMAT... New Release 1988 L. 196.000 

Riconfigurazione (senza formattare) del fattore d'accesso al disco fis¬ 
so, con miglioramento da 50 a 600%, ricupero settore boot, formatta 
zione a basso livello, partizioni, controllo, diagnosi hardware del disco 
fisso, ecc.. 

PAUL MACE G.R.A.S.P.... New Release 3.1. L. 280.000 

Presentazioni a livello professionistico (video e stampa), schermate e 
personaggi animati, demos, ecc. Cattura, edizione (immagini e colori), 
archiviazione (testo o grafico) in formati BSAVE, PIC, PCX (PC Paint- 
brush, Ventura), GIF. Sopporta testo e grafica CGA, EGA, VGA, 
Hercules Incolor, ecc.. 

PAUL MACE ARTOOLS... New!.L. 196.000 

Tutto il necessario per dare a G.R.A.S.P., senza difficoltà tecniche, 
le più sofisticate routines d'animazione, e straordinari effetti speciali video 
Tutli i nomi citati sono marchi registrati dai legittimi proprietari. 



MULTIWARE Via Sanvito. 60 21100 Varese (Va) 

(0332) 287576 PER ORDINI TELEFONICI E INFORMAZIONI 
(Rivenditori: consultarci) 

Totale allegato L _ 

Assegno circolare Assegno personale . Assegno Postale 
C/C Postale 14832216 Vaglia Postale 

Pagherò in contrassegno al postino Firma_ 

Ditta (o Nome)_Società (o Cognome)_ 

Indirizzo_ 

CAP_Città_Tel_ 


P IVA/Cod. Fisc i- _1_ ì _1—L 1. 1 .1. 1-Li ,.L !.. 1.1.1 ...i 

Desidero ricevere il disco-listino con il software fuori listino (nume 
rosi titoli) e le novità Allego L 3 500 in francobolli per contributo spese 


PAUL MACE Nvelope... New! (per Mac L. 145.000) L. 115.000 

Per catturare, editare, archiviare e stampare indirizzi (stampa vertica¬ 
le, varii caratteri di stampa, etichette e buste tutti i formati, mailing, ecc.). 
Compatibile con tutti gli elaboratori e stampanti, incluse HP o TI laser. 

PAUL MACE VACCINE... New!. L. 60.000 

Protezione del disco fisso e del sistema operativo ad alto livello, con 
tro tutti i VIRUS del computer e tutte le alterazioni indesiderabili. 

REINSTAL... New!. L. 160.000 

Garantisce tutti i programmi protetti installati su disco fisso (pur¬ 
ché con disinstallazione), contro ogni irrimediabile rischio di perdi¬ 
ta (optimizers e/o backup non selettivi, formattazione, «disastri» hard¬ 
ware o software, ecc.). Funziona con tutti i sistemi di protezione 
e computers. 

PC-8/MULTITASKING. L. 290.000 

Esegue SIMULTANEAMENTE sotto DOS. fino a 9 programmi, con 
qualsiasi cmputer compatibile, senza linguaggio o sintassi speciale. 
Versione multi utente con 7 programmi + 2 terminali ANSI (o PC in 
emulazione), e possibilità di gestione a lunga distanza tramite MODEM. 


PC-8/MULTIUSER... New! . L. 1.175.000 

LJ NEWSPACE... New Release. L. 220.000 

Aumenta la capacità in Mbytes di qualsiasi disco fisso (fino a 90%). 

QUAID - ANTIDOTE... New! . L. 155.000 

Ora indispensabile: localizza subito ed AUTOMATICAMENTE i files 
danneggiati da qualsiasi tipo di VIRUS, che possa gradualmente con 
taminare il computer. 

QUAID - COPYWRITE - New release 88.L. 130.000 


QUAID - ANALYZER - New professional release L. 345.000 
QUAID - DISK EXPLORER - New release 88. L. 140.000 
QUAID - The-Envelope-Please - New release L. 100.000 
PIZAZZ - Desktop Publishing Image Editor . L. 200.000 

Per catturare qualsiasi schermata, trasformare colori in 30 toni di gri¬ 
gio, ingrandire, rimpicciolire, finestrare, ruotare, e creare archivi d'im¬ 
magini. files compatibili con VENTURA, PAGEMAKER (.TIF) e PC 
PAINTBRUSH (.PCX). 

BACK-IT - Hard Disk Backup... New Release 88 L. 235.000 
Q-DOS-II - Hard Disk Manager... New Release 88 L. 155.000 
GS OPTIMIZER - Hard Disk Optimizer... NEW! L. 235.000 
WINDOWDOS - DOS Shell... New Release 88 L. 100.000 

EZ-MICROCACHE con SpeedWrite e SpeedSprint L. 190.000 
PRN-Matic - per cambiare i parametri di stampa L. 60.000 
JACK2 - Integrato (testo-calcolo-data base-grafica) L. 200.000 
TORNADO - Random Information Processor. L. 200.000 


WARP-TEN (velocizzatore) . L. 55.000 

RAMBAK (salvataggio disco RAM). L. 55.000 


POLYBOOST - Velocizz. (dischi, video, tastiera) L. 138.000 
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G.A.P. 

Primo Generatore Italiano di Programmi 
in linguaggio dBase Ili e compilatore clipper. 


G.a.p. è un pacchetto che permette di rea 
lizzare in pochi minuti una intera pro¬ 
cedura di gestione di uno o più ar¬ 
chivi dBase III a partire dal¬ 
l’inserimento, variazio¬ 
ne, cancellazione e 
visualizzazione per 
passare alle ricerche e 
stampe e per finire alla 
gestione sistema com¬ 
prendente salvataggi, ri¬ 
pristini, ristrutturazioni ecc. 

Il Generatore di Programmi 
in dBase III può essere utiliz¬ 
zato sia dalla grossa azienda, 
per ridurre i costi di realizzazio¬ 
ne del soft-ware, che dal singolo 
amatore che intenda imparare a 
programmare. Nel primo caso 



vantaggi sono molteplici: tempi di 
realizzazione dell’80-90% di una 
procedura praticamente nulli, uni¬ 
formità nella struttura delle videa- 
te, delle varie procedure, unifor¬ 
mità nella struttura dei pro¬ 
grammi; da questi vantaggi 
poi, ne scaturiscono altri co¬ 
me ad esempio una facile in¬ 
tercambiabilità dei pro¬ 
grammi da un progetto ad 
un altro. Nel secondo ca¬ 
so invece il fatto impor¬ 
tante è che GAP offre una 
soluzione al problema, spesso 
difficilmente risolvibile, di realizzare 
una procedura avente una struttura otti¬ 
mizzata sia in generale che all’interno dei 
singoli programmi. 


CARATTERISTICHE TECNICHE 

1 - GENERAZIONE MENU 

Genera il programma principale, più quello di in¬ 
stallazione e quello di apertura degli archivi. 

2 - GENERAZIONE SOTTOMENU 

Genera i sottomenu successivi ai menu della pro¬ 
cedura da cui partiranno i programmi. 

3 - GENERAZIONE DATA ENTRY 

Genera i seguenti programmi: 

Inserimento - Variazione - Cancellazione - Visualiz¬ 
zazione 

4 - GENERAZIONE DATA ENTRY (EDIT) 

Genera un data entry, come il precedente, che uti¬ 
lizza il comando DBEDIT del CLIPPER. 


5 - GENERAZIONE GESTIONE SISTEMA 

Genera i programmi addetti alle seguente funzioni: 
Salvataggio - Ripristino - Ricostruzione indici -Ri¬ 
strutturazione - Azzeramento -Format dischetti - 
Accesso al DOS. 

6 - GESTIONE RICERCHE 

Genera programmi per la ricerca e la visualizzazio¬ 
ne dei campi del file. 

7 - GESTIONE STAMPE 

Genera programmi per la stampa del file. Contiene 
l'opzione per la selezione dei campi da stampare. 

HARDWARE RICHIESTO 

512 Kbyte, 2 Floppy o 1 Floppy + Hard Disk 



SCHEDA DI PRENOTAZIONE 

Desidero ricevere N° . copie del programma GAP in offerta speciale inviandovi la 

somma di L. 280.000 cadauna anziché 560.000 comprese le spese postali. 

□ Invio assegno bancario non trasferibile, di L. 

intestato a EDICOMP Srl 

□ Versamento sul conto corrente postale n. 72609001 intestato 
a LIST - Programmi per il tuo home computer - Via Flavio 
Stilicone 111 - 00175 Roma, di cui allego fotocopia. 

□ Vaglfa postale intestato a EDICOMP Srl - Via Flavio Stilicone 111 
00175 Roma. 

Se è richiesta fattura indicare Partita IVA. 

Compilare e spedire in busta chiusa a: EDICOMP Sri. - Via Flavio Stilicone 111 - 00175 Roma 


NOME. 

COGNOME 


VIA ... 

CAP.CITTÀ. 

PROV. Tel. 


Clip 
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di PAOLO CIARDELLI 


Sbarcata in Europa, alcuni anni fa, com- 


Quando la co 


mercializzando una gamma di computer 
" portatili”, oggi la Bondwell immette sul 
mercato un personal che mette in luce tut¬ 
ta la classe di quest'industria giapponese 



on il PC denominato Pro 28 
la Bondwell immette sul mer- 
| g cato un computer XT Turbo 
compatibile, basato su di un 
microprocessore 8088-2 con 
velocità selezionabile a 4,77 oppure a 8 
MHz. 

Tra le altre interessanti caratteristiche, an¬ 
notiamo l’originale scheda ottica per la di¬ 
sabilitazione della tastiera in luogo della 
tradizionale chiavetta, che non troviamo in 
altri personal della stessa classe. 

La dotazione comprende inoltre il monitor 
a colori e la scheda grafica CGA o Hercules 
compatibile, due standard che sono la rap¬ 
presentazione dello stato dell’arte. 


l f ESTETICA 


Abbastanza tradizionale, con un tocco di 
rosso nelle scritte, che la personalizza un 
po’. 

Sulla parte anteriore troviamo il floppy disk 
da 5,25 pollici e 360 Kbyte e la mascherina 
che nasconde il disco rigido. 

Sotto ai drive, in posizione comoda e sicura 
allo stesso tempo, troviamo l’interruttore di 
accensione e spegnimento mentre sulla si¬ 


nistra del calcolatore ci sono due pulsanti 
(uno per il Reset hardware del calcolatore 
senza che esso debba essere spento e riac¬ 
ceso, l’altro per la scelta del clock del mi¬ 
croprocessor e) più alcuni led che segnala¬ 
no il funzionamento del disco rigido, l’avve¬ 
nuta selezione del turbo, l’inserimento della 
scheda di abilitazione e la presenza dell’ali¬ 
mentazione di rete. 

All’estrema sinistra, sopra la presa di colle¬ 
gamento della tastiera, un piccolo sportello 
nasconde il connettore Cannon per il joy¬ 
stick. 

LA CHIAVE OTTICA 

Dunque ecco la peculiarità maggiore di 


questo elaboratore: la chiave a forma di 
carta di credito per l’abilitazione della ta¬ 
stiera. 

All’interno del computer, una serie di led 
provvede a verificare otticamente che la 
scheda inserita possieda la giusta disposi¬ 
zione di fori. 

Viene raccomandato di non perdere o rovi¬ 
nare la scheda, di cui viene fornita una co¬ 
pia, e comunque di prendere nota del codi¬ 
ce della scheda stessa in modo da poterne 
richiede un’altra in caso di danneggiamen¬ 
to, perdita o furto. 

Per fronteggiare simili evenienze è consi¬ 
gliabile provvedere da soli: una vecchia 
scheda come quelle del gioco Portfolio o si¬ 
mili andrà benissimo; è sufficiente appog- 


VSeek 1.04 Fixed Disk Seek Timing Copyright (C) Golden Bow Systems 1986, 1987 



Press any key to continue 


Vbench 1.04 Benchmark Timing Copyright (C) Golden Bow Systems 1987 



Mul Div Loop Move Cali Vido DOS Rotn SeqR RndR Add7 Mul7 


Press any key to continue 
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giarvi sopra la scheda del Bondwell, che 
verrà utilizzata come controtipo, segnare la 
posizione dei fori e praticare gli stessi con 
un piccolo trapano (ideali quelli per model¬ 
lismo) o, più semplicemente, con un suc¬ 
chiello o con un cacciavite. 

Sul retro del calcolatore troviamo: il connet¬ 
tore Centronics per la stampante, il connet¬ 
tore per l’interfaccia seriale a 25 poli, la pre¬ 
sa per il monitor, un’uscita di potenza co¬ 
mandata dall’interruttore di accensione 
(probabilmente per alimentare un monitor 
monocromatico) e la griglia di aereazione 
del ventilatore. 

Al di sotto del connettore Centronics, una 
piccola apertura permette di accedere ai 
DIP switch di configurazione senza essere 
costretti ad aprire tutto il calcolatore. 
Questi switch permettono di configurare la 
velocità del microprocessore all’atto del¬ 
l’accensione, di aggiungere o meno una 
stato di attesa alla RAM (per eventuali pro¬ 
blemi di compatibilità software), di informa¬ 
re il calcolatore della presenza del copro- 
cessore matematico, eccetera. 


LA TASTIERA 

Si tratta del tipo standard XT a 84 tasti e si 
presenta molto bene a una veloce battitura, 
anche se è un tantino rumorosa. 

Questa caratteristica è comunque preferi¬ 
bile a una tastiera silenziosa, perché rende 
più agevole il lavoro all’operatore. 

LA SCHEDA GRAFICA 

Il Bondwell Pro 28 monta di serie una sche¬ 
da grafica con compatibilità dichiarata ver¬ 
so gli standard CGA ed Hercules. 

Questo tipo di scheda, diffusissima e quindi 
con livello di compatibilità di altissimo livel¬ 
lo, è quella che garantisce la maggiore fles¬ 
sibilità: alta risoluzione, per esempio in ap¬ 
plicazioni di CAD, grazie alla grafica Hercu¬ 
les (720*348 punti, monocromatica); colore, 
soprattutto per i giochi e la business grafi¬ 
ca, grazie alla grafica CGA (fino a 640*200 
punti e 4 o 16 colori). 

La compatibilità verso i due standard si ot¬ 


tiene spostando un ponticello posto sulla 
piastra madre, all’interno del calcolatore, 
così come spiega uno dei manuali allegati. 
Quindi è possibile disporre o di una scheda 
grafica CGA oppure di una scheda grafica 
Hercules; questo va deciso al momento del¬ 
l’installazione del calcolatore. 

Per modificare la modalità grafica occorre 
aprire il calcolatore, perciò consigliamo di 
non farlo troppo spesso. 

IL MONITOR 

Il monitor oggetto della prova, come già 
detto, è a colori da 14 pollici, sorprendente¬ 
mente “made in Italy". 

LE MEMORIE DI MASSA 

Il disco rigido in dotazione con questa mac¬ 
china è da 20 Mb, in linea con la classe del 
calcolatore. 

I test eseguiti hanno dato una velocità me¬ 
dia di accesso di circa 80 ms. 

II floppy disk drive da 5,25 pollici ha una ca¬ 
pacità formattata di 360 Kbyte. 

LA DOCUMENTAZIONE 

Con il calcolatore vengono forniti alcuni 
manuali e programmi: il sistema operativo 
MS-Dos versione 3.2, il GWbasic 3.2 e un 
programma di trattamento testi EasyWrite 
della Micropro. 

Oltre ai manuali relativi al sistema operati¬ 
vo, di oltre 400 pagine, e del Basic, troviamo 
altri tre piccoli manuali: il CPU Card User’s 
Manual, il Desktop PC User’s Manual e l’I/O 
Card User’s Manual, di una trentina di pagi¬ 
ne ciascuno. 

In questi manuali sono illustrate piccole 
operazioni, come la predisposizione degli 
switch e l’installazione del calcolatore e di 
schede aggiuntive. 

Nel complesso una discreta quantità di do¬ 
cumentazione come di rado si riscontra so¬ 
lo nei calcolatori più blasonati. 

Notevole soprattutto la fornitura del siste¬ 
ma operativo, con tanto di numero di serie. 
EasyWrite, il programma di trattamento testi 
forniti in dotazione standard con il Bond¬ 
well Pro 28, è un programma molto sempli¬ 
ce da utilizzare. 

Esso è perfettamente in grado di soddisfare 
la totalità delle esigenze di un normale 
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THE LANDMARK CPU SPEED TEST: SPEED Versione 2.04 ss= 

Copyright 1986 Landmark Software 
1142 Pomegranate Court 
Sunnyvale CA 94087 
408-733-4035 


Questo sistema gira con una frequenza AT con circa : 

MHz 2 3 4 56789 10 12 


14 16 18 20 24 


H-1-h-+ 


1-1-h 


i—I-h 



2.0 MHz 


1.0X 

Percentuale relativa a 


4.77 MHZ XT 


lx 


Aktuelle Zeit: 00:10:42 
Akt.Test Nr.: 6 


2x 


3x 


4x 


H-1-1—I— 

5x 6x 7x 8x 


Zeit seit Programmstart 
Je Durchlauf benòtigte Zeit 


lOx 12x 


00:00:05 
513 ms 


FI Hilfe Q Schalter ohne Ton C Schalter Farb ESC zum DOS 


Sl-System Information, Advanced Edition, (C) Copr 1987, 1988, Peter Norton 

Copyright Notice: COPYR. BONDWELL HOLDING 1985= 

Operating System: DOS 3.21 
Built-in BIOS dated: Monday, October 29, 1928 

Main Processor: Intel 8088 Serial Ports: 1 

Co-Processor: None Parallel Ports: 1 

Video Display Adapter: Color/Graphics (CGA) 

Current Video Mode: Text, 80 x 25 Color 
Available Disk Drives: 3, A: - C: 

DOS reports 512 K-bytes of memory: 

45 K-bytes used by DOS and resident programs 
467 K-bytes available for application programs 
A search for active memory finds: 

512 K-bytes main memory (at hex 0000-8000) 

32 K-bytes display memory (at hex B800-C000) 

ROM-BIOS Extensions are found at hex paragraphs: C800 

Computing Index (CI), relative to IBM/XT: 1.5 

Disk Index (DI), relative to IBM/XT: Not computed. No drive specified. 

Performance Index (PI), relative to IBM/XT: Not compuced. 

C:\TEST> 


utente; contiene persino il programma di 
correzione ortografica (solo in inglese), 
inoltre è disponibile il modulo per la gestio¬ 
ne delle lettere circolari EasyMail. 


I BENCHMARK 

Ecco i risultati di alcuni test eseguiti sul 
Bondwell Pro 28, per ottenere dei dati ri¬ 
guardanti la velocità di elaborazione sia del 
microprocessore sia delle periferiche. 


IL MICROPROCESSORE 

Il Syslnfo di Peter Norton, Advanced Edi- 
tion, ha riportato un indice pari ad 1, relati¬ 
vo ad un IBM XT, con il clock selezionato a 
4,77 MHz e un indice di 1,5 innestando il tur¬ 
bo, cioè a 8 MHz. 


LA MEMORIA DI MASSA 

Come già accennato, il disco rigido fornito 
con il calcolatore non è molto veloce; si 
tratta di un disco da 20 Mb formattati, con 
quattro testine, 613 cilindri e 17 settori per 
traccia. Il Syslnfo Advanced Edition forni¬ 
sce un indice relativo a un personal com¬ 
puter XT di 1,7. 

Nel complesso, facendo riferimento ai 
benchmark pubblicati nelle pagine prece¬ 
denti, questo Bondwell Pro 28 settato sul 
clock a 4.77 MHz, è risultato veloce quanto 
un IBM XT, mentre con un clock a 8 MHz 
esegue le operazioni ad una velocità quasi 
doppia. 

Tutto ciò vale sia per operazioni basate sul 
set di istruzioni 8088, virgola mobile e lettu¬ 
ra/scrittura in RAM che su quelle basate 
sui vari loop con riordinamento e sposta¬ 
mento di stringhe. 


SCHEDA TECNICA 

MODELLO 

Bondwell 28 Pro 

MICROPROCESSORE 

8088-2 con clock selezionabile on-line 

4.77/8 MHz 

C0PR0CESS0RE 

predisposizione coprocessore matematico 

opzionale 

MEMORIA 

RAM utente: 512Kbyte espandibile a 640 
Kbyte 

RAM video: 64Kbyte 
ROM caratteri video: 8Kbyte 
ROM BIOS monitor: 8Kbyte 
GRAFICA: 

chip grafico video compatibile Hercules e 
CGA 

Massima risoluzione: 720*384 
TASTIERA: 

Avanzata tipo PC IBM a 101 tasti 
ESPANSIONI: 

cinque slot di espansione orizzontali per 
PC/XT 

predisposizione interna per un secondo 
floppy drive 
da 5.25” o 3.5” 

INTERFACCE: 
video Hercules e CGA 
RS 232C, parallela Centronics, 
game port 

SOFTWARE IN DOTAZIONE 
MS-DOS 3.21, GW BASIC 3.2, 

Easy word processor, Video Display Unit 

Program 

MANUALI: 

Easy Guide, manuale utente, manuale 
MS-DOS, 

manuale GW BASIC 
PESO UNITÀ CENTRALE: 

8.75 Kg 

DIMENSIONE UNITÀ CENTRALE: 

131 mm(H) * 383 mmm(L) * 380 mm(W) 


SCHEDA DEI PRODOTTO 

MODELLO: 

Bondwell PRO 28 
COSTRUTTORE: 

Bondwell International Ltd 
2/F, Chung Nam Centre 
414 Kwun Tong Road 
Kowloon, Honk Kong 
Tel. 3-419371 
DISTRIBUTORE: 

Bondwell Italia Via Cantò, 19 
20092-Cinisello Balsamo (MI) 
Tel. 02/66011212 
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AmSTRAD PC2386 

...PER CHI NON SI ACCONTENTA 


di PAOLO CIARDELLI 

Il PC238Ó è II modello più potente della 
nuova famiglia di microcomputer profes¬ 
sionali Amstrad PC2000, ed è disponibile 
in quattro diverse configurazioni 


jm a fascia di questi personal 
| I basati sull’Intel 80386 si rivol- 

I | ge in maniera diretta al- 

l’utente che per svolgere il 
suo lavoro professionale 
adopera fogli elettronici complessi, consul¬ 
ta voluminosi database o gestisce applica¬ 
zioni grafiche come il CAD. Il cuore di que¬ 
sta nuova scommessa alla commercializza¬ 
zione di personal ad alte prestazioni ma dal 
basso prezzo al pubblico, gira alla “veloci¬ 
tà" (ndr. parlando di un quarzo dovremmo 
dire frequenza) di 20 MHz, elaborando i dati 
a 32 bit e non è poco. 

Per gli incontentabili è disponibile lo zocco¬ 
lo vuoto per il coprocessore aritmetico 
80387, per mettere le ali ai calcoli puramen¬ 
te matematici e per far girare tutte quelle 
applicazioni che ormai necessitano di tale 
processore. 


NECESSITÀ E VIRTÙ 

Velocità è bello. Succede però che i chip di 
memoria che, per spiegarne il funziona¬ 
mento, possiamo paragonare ad una fila di 
pompieri che si passano dei secchi per spe¬ 
gnere un incendio, andando troppo alla 
svelta finiscono per passarsi dei secchi 
vuoti. 
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Per questo motivo i computer ad alta velo¬ 
cità mettono a dura prova i tempi di rispo¬ 
sta della memoria e per sopperire a questo 


inconveniente il PC2386 lavora quasi sem¬ 
pre alla massima velocità grazie a una ca¬ 
che memory di 64 Kbyte grazie a dei chip di 
memoria statica ultraveloce con tempi di ri¬ 
sposta di 35 ns. 

Questo accorgimento consente di ottenere 
lo “zero wait state” nel 95% del tempo di 
elaborazione. 


Poiché l’MS-DOS è in grado di utilizzare so¬ 
lamente 640 Kbyte di RAM, Amstrad forni¬ 
sce insieme alla macchina dei driver soft¬ 
ware che consentono di impiegare la me¬ 
moria che in configurazione base è di 4 
Mbyte di RAM “parity cache" sulla scheda 
madre, come memoria espansa LIM 4.0. 

In questo modo le applicazioni che ricono- 
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Main Processor: Intel 80386 Serial Ports: 1 

Co-Processor: None Parallel Ports: 1 

Video Display Adapter: Video Graphics Array (VGA) 

Current Video Mode: Text, 80 x 2S Color 
Available Disk Drives: 3; A: - C: 


DOS reports 640 K-by 
146 K-byt e s used 
494 K-bytes av/ail 
A search for active 
640 K-bytes main 
12 K-bytes di spi 

11 K-bytes displ 

12 K-bytes displ 
9 K-bytes displ 

25 K-bytes displ 
54 K-bytes displ 
R0M-BI0S Extensions 


t e s of memory: 

by DOS and resident programs 
able for application programs 
memory find s: 


memory 
ay memory 
memory 
memory 
memory 
memory 
memory 
f ound 


ay 

ay 

ay 

ay 

ay 

are 


( a t 
( at 
( a t 
( a t 
( at 
C a t 
( a t 


he x 
he x 
he x 
he x 
he x 
he x 
he x 


0000-A000) 

A000-A300) 

A340-A600) 

A640-A940) 

A980-ABC0) 

AC00-B240) 

B280-CQ00) 


at h e x paragraphs: C000 E000 


Computing Index (CI), relative to IBM/XT: 23.4 

Disk Index (DI), relative to IBM/XT: Not computed. No drive specified 

Performance Index (PI), relative to IBM/XT: Not computed. 

C:\TEST > 


scono questo tipo di memoria possono su¬ 
perare la barriera dei 640 Kbyte imposta dal 
DOS. 


All INTERNO 

Gli slot di espansione, di tipo full size sono 
5. AT compatibili, e consentono di alloggia¬ 
re le schede di espansione. 

bus di espansione del PC2386 lavora a 8 
MHz, velocità inferiore a quella del clock di 
sistema, per consentire l’impiego di schede 
di espansione standard come modem inte¬ 
grati, schede fax e porte di 1/0 aggiuntive. 
Il controller delle memorie di massa pilota i 
nuovissimi drive a floppy disk ad alta capa¬ 
cità che possono leggere sia i normali di¬ 
schi da 720 Kbyte, sia i nuovi floppy ad alta 
densità da 1,44 Mbyte. 

Però per non lasciare nelle peste chi pos¬ 
siede “ancora” del software o dati memo¬ 
rizzati su floppy disk a 5,25 pollici, tutte le 
macchine della serie PC2000 sono dotate di 
una porta verso il mondo esterno per colle¬ 
gare un adattatore per un drive opzionale. 
Una volta collegato, il drive esterno consen¬ 
te il trasferimento dei dati da un disco all’al¬ 
tro indipendentemente dal formato, oppure 
l’utilizzo dei dati direttamente dai floppy a 
5,25 pollici. 

Ma i vantaggi non si fermano a ciò. Questa 
soluzione permette anche di collegare al 
computer un’unità esterna di backup a na¬ 
stro, per eseguire copie di sicurezza dei da¬ 
ti. 


Tornando alle memorie di massa troviamo 
un più che capiente hard disk da 65 Mbyte 
ad alte prestazioni dotato di interleaving 1:1 
e di sector buffering. 

Contando gli slot di espansione e trovan¬ 
done solo 5, intendevamo che per mante¬ 
nere integro lo spazio riservato alle espan¬ 
sioni, il PC2386 integra sulla scheda madre 
i dispositivi di I/O quali la porta seriale, por¬ 
ta parallela bidirezionale e presa per moni¬ 
tor VGA di tipo analogico. 


Il VIDEO 

Lo standard VGA sembra aver preso ormai 
piede quasi scalzando il migliore per certi 
aspetti EGA. 

L’ingegnerizzazione spinta e la tecnologia 
ASIC, hanno fatto il resto ed il chip video 
PVGA montato su questo elaboratore sup¬ 
porta tutti i modo grafici inferiori: EGA, 
CGA, MDA e HERCULES. 

Per completare la configurazione del 
PC2386 è possibile scegliere uno qualsiasi 
dei quattro nuovi monitor VGA di tipo ana¬ 
logico Amstrad, che vanno da 12 pollici mo¬ 
nocromatico a 14 pollici a colori ad alta ri¬ 
soluzione. 

Il PC2386 viene fornito completo di sistema 
operativo MS-DOS 4.0 e Windows 386, oltre 
alla più recente versione del GW-BASIC. La 
macchina è compatibile con il software No¬ 
vell NetWare e può funzionare indifferente¬ 
mente come server o come terminale. La ta¬ 
stiera è una AT compatibile a 102 tasti e in¬ 


corpora nei rispettivi tasti i led di segnala¬ 
zione dell’attivazione dei comandi Cap- 
sLock, NumLock e ScrollLock. 

Il mouse Amstrad in dotazione è un Micro¬ 
soft compatibile completo di driver .COM e 
.DRV. 

Un interruttore di sicurezza incorporato 
nella macchina ne impedisce l’uso da parte 
di persone non autorizzate, e disabilita la 
tastiera. Il PC2386 ha in comune con le altre 
macchine della famiglia PC2000 un alto- 
parlante incorporato con controllo di volu¬ 
me o un orologio a batteria che fornisce au¬ 
tomaticamente data ed ora. 


CARATTERISTICHE TECNICHE: 

Microprocessore 80386 con clock a 20 MHz 
Memoria RAM 4 Mbyte 
RAM-cache 64 Kbyte a 35 nsec. 

Floppy disk drive a 3.5 pollici da 1,44 Mbyte 

Hard disk 65 Mbyte incorporato 

Connettore per drive esterno floppy disk a 

5,25 pollici da 360 Kbyte o 1,2 Mbyte o a 3,5 

pollici da 720 o 1,44 Mbyte 

Grafica VGA compatibile con standard 

CGA, EGA, MDA, HERCULES 

Tastiera estesa 102 tasti 

Mouse Microsoft compatibili 

Porta parallela bidirezionale Centronics 

Porta seriale RS-232 

5 slot di espansione full size PC AT compa¬ 
tibili 

Sistema operativo MS-DOS 4.0 
Linguaggio GW-BASIC 
Microsoft Windows 386 
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MT81 E‘ L UNICA 
STAMPANTE 
PROFESSIONALE 


A L 299.000 


+ IVA 


• 80 COLONNE A 10 CPI 

• 130 CPS IN ALTA VELOCITÀ 

• 24 CPS IN ALTA DEFINIZIONE 

• COLLEGABILE A HOME E PERSONAL COI 

• MASSIMA SILENZIOSITÀ 


Puoi trovare la MT81 in tutta Italia presso le reti di vendita di: MILANO - SILVERSTAR LTD SPA - TEL. 
02/4996 M MILANO - ACS ELETTRONICA SPA - TEL 02/5398721-5694082 MILANO - CLAITRON SPA 
- TEL 02/3010091 TORINO - ABACUS SRL - TEL 011/6680164 VERONA - TELESTORE 2 SRL - TEL 
045/541051 TRIESTE- I.B.C. SRL - TEL 040/733395 REGGIO EMILIA- H.S.D. SRL - TEL 0522/557600 
m BOLOGNA - NON STOP SPA - TEL 051/765299 RAVENNA - S.H.R. ITALIA SRL - TEL 0544/463200 
FIRENZE - DEDO SISTEMI SPA - TEL 055/4360251-4361901-4361902 ROMA - ALTEC SRL - TEL 
06/3605943-3615744-3615745 NAPOLI - MASTERS INFORMATICA SRL - TEL 081/7703024- 
7703025 m PALERMO - BELCO SRL - TEL 091/547566-545827 
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Teiesoftware 


L’INFORMATICA 
ATTRAVERSO LA TELEVISIONE 


di MARINA ATZU 

Programmi per home-computer trasmessi 
attraverso i canali televisivi è l'interessan¬ 
te iniziativa di Rai-Televideo in collabora¬ 
zione con il Ministero della Pubblica Istru¬ 
zione e di 53 Istituti Tecnici Italiani che si 
avviano ad essere “scuole pilota nell'ap¬ 
plicazione dell'informatica nell'insegna¬ 
mento di qualsiasi materia ” 

Un 'intervista al responsabile del telesoft- 
ware per la RAI, dottor Piersilverio Pozzi 


opinione di molti che pur- 
4 r troppo, il rapporto delle per- 

I sone con l'informatica sia di 
carattere prettamente tecni- 

BHI co. 

Mi spiego meglio: normalmente si tende so¬ 
lo all’acquisizione dell’uso degli strumenti 
informatici e non della vera essenza dell’in¬ 
formatica, quali ad esempio le sue possibili¬ 
tà di applicazione e le sue logiche di funzio¬ 
namento. 

In risposta all’esigenza di diffondere l’infor¬ 
matica in maniera più capillare nasce il Ra- 
dio-software che trasmette software didatti¬ 
co attraverso i canali radiofonici. 

II primo esperimento di radio-software na¬ 
sce a Bologna nel 1985 come esperimento 
a diffusione regionale e contestualmente 
un analogo esperimento viene fatto, a livel¬ 
lo nazionale, a Roma sulla terza rete radio¬ 
fonica. 


Durante il programma “UN CERTO DI¬ 
SCORSO” su radio 3 sono stati trasmessi 
programmi per computer domestici. 

Sul radio-software tornerò più diffusamente 
in un altro articolo illustrandovi le modalità 
di ricezione; per ora vi basti sapere che la 
trasmissione di dati via radio non può esse¬ 
re fatta sfruttando il segnale audio solo in 
parte, quindi la tramissione va fatta a tutto 
canale. 

Da questa limitazione, ferma restando l’uti¬ 
lità didattica del radio software, è nata l’esi¬ 
genza di riuscire a trasmettere dei dati sen¬ 
za occupare un intero canale e quindi sen¬ 
za limitazioni di sorta alla diffusione verso 
gli utenti. 


Il TEIESOFTWARE: 

ASPETTI TECNICI 

Il segnale televisivo può essere, a differenza 
di quello audio, usato in parte per trasmet¬ 
tere informazioni. 

Le righe televisive non sono tutte utili ai fini 
della formazione dell’ immagine; alcune di 
esse (25 per l’esattezza) sono sfruttate per il 
ritorno, al punto di partenza, del pennello 
elettronico che ha compiuto la scansione 
del semiquadro televisivo. 

In questo brevissimo intervallo di tempo e 
quindi in queste 25 righe possono essere 
inserite delle informazioni di varia natura ed 
in particolare otto di esse sono occupate 
dal segnale TELEVIDEO. 

Il segnale TELESOFTWARE viene trasmes¬ 
so appunto sfruttando il segnale televideo 
con delle specifiche tecniche particolari. 

I caratteri della pagina teiesoftware vengo¬ 
no trasmessi a 8 bit anziché a 7 bit come so¬ 
litamente avviene per le normali pagine te¬ 
levideo e per questa ragione un normale 


decoder non riesce a decodificarli corretta- 
mente. La pagina teiesoftware appare per¬ 
ciò incomprensibile all’utente. 

Per poter decodificare le pagine teiesoftwa¬ 
re occorre un’interfaccia fra il personal 
computer ricevente e l’apparecchio televisi¬ 
vo. 

Questa interfaccia deve essere gestita da 
un apposito software che viene definito 
PROTOCOLLO DI COMUNICAZIONE. 

Il protocollo di comunicazione ha il compito 
di ricevere i dati, eliminare gli eventuali erro¬ 
ri e rendere comprensibile all’utente l’intero 
file di dati ricevuto. 

Definiamo brevemente le due funzioni prin¬ 
cipali del protocollo: 

Rivelazione e/o correzione di eventuali er¬ 
rori durante la ricezione. 

Tale correzione si effettua inviando, insie¬ 
me ai byte utili, dei caratteri “ridondanti” 
che consentono, in ricezione di effettuare 
dei controlli allo scopo di rivelare degli erro¬ 
ri ed eventualmente di correggerli. 
Ricostruzione in ricezione di un file di dati. 
Un file è definito come una sequenza di dati 
che hanno senso compiuto. 

Normalmente un file trasmesso non può es¬ 
sere contenuto in una sola pagina televi¬ 
deo. Una pagina televideo contiene circa 
900 caratteri, mentre un programma tra¬ 
smesso è sull’ordine delle decine di kilo-by- 
tes cioè decine di migliaia di caratteri. 

Le varie pagine trasmesse possono inoltre 
appartenere allo stesso fascicolo o a fasci¬ 
coli diversi. 

Occorre pertanto trasmettere all’interno di 
esse dei caratteri particolari detti di 
“link”(di concatenazione) che consentono 
al personal ricevente di individuare le pagi¬ 
ne del file selezionato riordinandole nella 
giusta sequenza. 

Ovviamente, mentre l’interfaccia hardware 
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ELENCO DEGLI ISTITUTI PER 

LA SPERIMENTAZIONE TELESOFTWARE DELLA RAI-TELEVISIONE 


LOMBARDIA 


ITC - PARETO 

Viale Litta Modignani 55 

20161 Milano 

ITC - ZAPPA 

Viale Marche 71 

20159 Milano 

ITI - GIORGI 

Viale Liguria 21 

20144 Milano 


PIEMONTE 

ITC - SELLA 
Via Montecuccoli 12 
10121 Torino 
ITI - OLIVETTI 
Colle Bellavista 
10015 Ivrea 
ITI - AVOGADRO 
Corso S. Maurizio 8 
10124 Torino 
ITI - BALDRACCO 
Corso Ciriè 7 
10152 Torino 


LIGURIA 

ITC - V. EMANUELE II 
Largo Zecca 4 

16124 Genova 
ITC - TORTELLI 

Via Salite Battistine 10 

16125 Genova 
ITI - NATTA 

Via della Chiusa 
16039 Sestri Levante 


VENETO 

ITC - SARPI 
Via Castello 2821/C 
30122 Venezia 
ITC - LORGNA 
Via Ca’ De Cozzi 39 
37124 Verona 
ITI - FERRARIS 
Via del Pontiere 40 
37122 Verona 
ITI - MARCONI 
Via Manzoni 80 
35126 Padova 
ITI - MARCONI 
Piazzale Segantini 21 
37138 Verona 


FRIULI VENEZIA GIULIA 

ITC - ZANON 
Piazzale Cavedalis 5 
33100 Udine 
ITI - MALIGNANI 
Via L. Da Vinci 5 
33100 Udine 


TOSCANA 

ITC - VESPUCCI 


Via Chiarini 1 
57123 Livorno 
ITI - GALILEI 
Via Galilei 18 
57122 Livorno 
ITC - EINAUDI 
Via Garibaldi 184 
56100 Pisa 
ITC - EINSTEIN 

Via San Bartolo a Cintoia 19/a 
50142 Firenze 


EMILIA ROMAGNA 


ITC - PARADISI 
Via Resistenza 
41058 Vignola 
ITI - CORNI 
Largo A. Moro 25 
41100 Modena 
ITI - DA VINCI 
Via Mazzini 202 
40046 Porretta Terme 
ITI - COPERNICO 
Via Pontegradella 25 
44100 Ferrara 
ITC - MELLONI 
Viale Maria Luigia 9 
43100 Parma 


LAZIO 

ITC - DA VINCI 
Via Piave 10 
03100 Frosinone 
ITI - VOLTA 
Viale Roma 
03100 Frosinone 
ITC - FILANGERI 
Via della Conca 
0483 Formia 
ITI - XX 
Via Lombroso 
00168 Roma 

ITC - MEDICI DEL VASCELLO 

Via Fonteiana 111 

00152 Roma 

ITI - CURIE 

Piazza Dante 9 

00185 Roma 

ITI - PACINOTTI 

Via Montaione 9 

00138 Roma 

ITI - VALLAURI 

Via Grottaferrata 76 

00178 Roma 

ITI 

Via Pascoli 112 

34043 Cassino 

ITI - PACINOTTI 

Via Appia Lato Tiri 57 

04022 Fondi 

ITI - FERMI 

Via Minardi 14 

00044 Frascati 

ITI - CARDANO 

Piazza della Resistenza 1 

00015 Monterotondo 

ITI - DA VINCI 

Via Volta 

01100 Viterbo 

ITC - L. DI SAVOIA DUCA ABRUZZI 


Viale Maraini 54 
02100 Rieti 
ITI - ROSATELLI 
Viale Fassini 2 
02100 Rieti 


MARCHE 

ITI - MARCONI 
Via R. Sanzio 8 
60035 Jesi 


UMBRIA 

ITC - CAPITINI 
Via Trasimeno Ovest 
06074 Olmo Perugia 
ITC - V. EMANUELE II 
Piazza Anna Frank 11 
06100 Perugia 


CAMPANIA 

ITI - GIORDANI 
Via Laviano 
81100 Caserta 
ITC - SERRA 

Via Trinità delle Monache 2 

80134 Napoli 

ITI - RIGHI 

Viale Kennedy 112 

80125 Napoli 

ITI - VOLTA 

Piazza S. Maria La Fede 16 
80141 Napoli 


PUGLIA 

ITI - PANETTI 
Via Re David 186 
70125 Bari 
ITI 

Via delle Rimembranze 56 
70043 MONOPOLI 


SARDEGNA 

ITI - GIULIA 

Via Montecassino ang. Via Tigli 

09134 Cagliari - Pirri 

ITC - DA VINCI 

Via Ciusa 4 

09131 Cagliari 


SICILIA 

ITC - ABRUZZI 
Via E. Fazio 1 
30143 Palermo 

N.B. In questo elenco non è compreso 
l’I.T.I.S. “Enrico Fermi" di Roma, in 
quanto esso ha funzioni di coordinato- 
re del gruppo composto da tutti gli altri 
istituti. 
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sarà unica, il protocollo di comunicazione 
varierà a seconda della famiglia di compu¬ 
ter. 

Attualmente è disponibile per i personal 
OLIVETTI, IBM e per gli home computer del¬ 
la serie MSX. 

COME RICEVERE 
Il TELESOFTWARE 

Attualmente esistono, per il telesoftware 
RAI, due protocolli di comunicazione: uno 
realizzato in collaborazione con l’OLIVETTI 
e l’altro con la SELECO. 

La SELECO ha realizzato un sistema inge¬ 
gnoso che consente di ricevere il talesoft- 




Collegamento tramite RS232 fra televisore Seleco e PC. 


Segnale Teletext su alcune righe di cancellazio¬ 
ne di quadro de! segnale video. 


ware con un’interfaccia contenuta nello 
stesso televisore. 

Ha infatti modificato l’apparecchio televisi¬ 
vo dotandolo di presa RS232. 

Mediante questa presa il personal preleva i 
dati e li elabora con un opportuno pro¬ 
gramma fornito dalla stessa SELECO. 
Questa soluzione non è per ora commer¬ 
cializzata; i televisori SELECO dotati di 
RS232 sono stati consegnati ad alcune 
scuole italiane che hanno seguito passo 
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Così appare su un normale apparecchio televisivo una delle pagine Telesoftware. 


passo le prime trasmissioni sperimentali di 
telesoftware. 

L’OLIVETTI ha invece realizzato due tipi di 
interfaccia: una esterna ed una che si inse¬ 
risce nel personal. 

Quella esterna consiste in un box di inter¬ 
faccia che collega l’uscita d’antenna al per¬ 
sonal (questa soluzione è stata già speri¬ 
mentata ed è in funzione per il servizio di in¬ 
formazioni AGIP offerto sulle autostrade). 
Quella interna consiste in una scheda che 
si inserisce direttamente in uno slot libero 
del personal; è una soluzione non commer¬ 
cializzata ed è analoga al box di interfaccia 
esterno. 

Entrambe le due soluzioni possono fare a 
meno dell’apparecchio televisivo in quanto 
sono dotate di un sintonizzatore TV, di un 
decoder televideo e di un dispositivo per la 
serializzazione dei dati inviati al computer 
tramite la porta RS232. 

Esiste una terza soluzione che consente il 
trasferimento dei dati sfruttando la presa 
SCART del televisore. 

Apriamo una parentesi per dire che la pre¬ 
sa scart è un accessorio di cui tutti i televi¬ 
sori di ultima costruzione dai 20” in su de¬ 
vono essere dotati. 

In questo caso l’interfaccia preleva il se¬ 
gnale video demodulato all’uscita della 
scart e lo trasforma in un flusso di dati che 
vengono inviati al personal sulla porta se¬ 
riale RS232. 

Questa soluzione pur essendo meno costo¬ 
sa delle altre in quanto l’interfaccia contie¬ 
ne solo il decoder televideo e il drive RS232, 
non è ancora disponibile in Italia. 

A prescindere dalla soluzione hardware 
adottata, il computer ha bisogno per riceve- 
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re i dati, di un apposito programma che, a 
seconda del protocollo utilizzato, gestisce 
la ricezione stessa. 

Questo programma è disponibile (sia per il 
protocollo RAI-OLIVETTI che per il proto¬ 
collo RAI-SELECO) su floppy-disk per le fa¬ 
miglie di personal dotati di sistema operati¬ 
vo MS-DOS. 


ASPETTI EDITORIALI 
DEL TELESOFTWARE 
E PROSPETTIVE FUTURE 

Nella primavera del 1988 e ai primi del mese 
di Gennaio 1989 sono state trasmesse delle 
unità didattiche di telesoftware e l’ente di 
stato è intenzionata ad ampliare sempre di 
più questo servizio del televideo. 

Per saperne di più in materia ho intervistato 
il dottor Piersilverio Pozzi dirigente respon- 
sbile del servizio telesoftware per la RAI. 

List: Dottor Pozzi ci parli delle sue esperien¬ 
ze di telesoftware. 

Pozzi: Nella primavera scorsa il Ministero 
della Pubblica Istruzione ha approvato un 
programma di sperimentazione di telesoft¬ 
ware e radio software che coinvolgesse 53 
Istituti Tecnici dislocati su tutto il territorio 
nazionale. 

Le unità didattiche da trasmettere sono sta¬ 
te realizzate da un’equipe di insegnanti del¬ 
l’Istituto Tecnico Industriale di Roma “Enri¬ 
co Fermi” e sono state sviluppate in am¬ 
biente MS-DOS. 

Questo progetto, nato per diffondere l’infor¬ 
matica in maniera più completa e capillare, 
prevedeva un ciclo di trasmissione di 20 
unità didattiche e un successivo seminario 
di verifica. 

In realtà l’esperimento è stato interrotto a 
Maggio, data l’imminente chiusura dell’an¬ 
no scolastico. Le unità trasmesse sono sta¬ 
te soltanto 14. 

A ciascuno dei 53 Istituti è stato consegna¬ 
to un televisore SELECO appositamente at¬ 
trezzato per ricevere il telesoftware ed il pro¬ 
gramma da caricare sul personal necessa¬ 
rio a decodificare il software trasmesso. 

A Gennaio di quest’anno sono state tra¬ 
smesse le restanti unità e dalla sera del 18 
al 21 si è tenuto, presso il CEDUIC di Peru¬ 
gia, il previsto seminario di verifica che è 
stato in realtà un corso di aggiornamento 
per tecnologie educative al quale hanno 
partecipato i rappresentanti dei 53 istituti. 



Il dottor Pozzi al suo tavolo di lavoro mentre 
controlla la trasmissine di un file didattico. La 
trasmissione è effettuata con protocollo Seleco. 


List: Dottor Pozzi quali sono stati i risultati 
di questa sperimentazione e quali sono i 
vantaggi della ricezione di software attra¬ 
verso l’etere? 

Pozzi: Uno dei risultati della sperimentazio¬ 
ne è stato quello di far emergere del softwa¬ 
re sommerso. 

153 Istituti scelti dal ministero della pubblica 
Istruzione sono all’avanguardia nel campo 
della sperimentazione e dell’introduzione 
dell'informatica nella scuola. 

Molti di essi hanno infatti già prodotto dei 
pacchetti di software. Lo scopo è di mettere 
in circolazione questi materiali attraverso la 
creazione di un “osservatorio di software 
didattico”. 

Si vuole dimostrare che l’informatica può 
essere applicata all’insegnamento di qual¬ 
siasi materia, infatti ci sono anche dei pro¬ 
grammi di Italiano; quindi, dimostrare che 
l’informatica è uno strumento indispensabi¬ 
le per l’insegnante. 

In quanto ai vantaggi della diffusione di 
software attraverso l’etere c’è da dire che, 
intanto è sicuramente un sistema poco co¬ 
stoso, se si escludono le spese iniziali per 
attrezzarsi alla ricezione. 

I programmi rimangono in onda inalterati 
per tutto il periodo comunicato all’utente. 
Nell’ambito di questo periodo l’utente può 
collegarsi in qulsiasi momento, ricevere i 
dati e memorizzarli in RAM o su disco o su 
cassetta per riutilizzarli quando lo desidera. 


List: La diffusione via etere non è però inte¬ 
rattiva. 

Pozzi: È vero. Però viene mantenuta l’inte- 
rattività fra utente e computer in quanto vie¬ 
ne gestita dai programmi caricati nel com¬ 
puter stesso. 


La mancanza di interattività del mezzo tra¬ 
smissivo non costituisce a mio parere un in¬ 
conveniente grave. 

Il flusso di dati dall’allievo al centro didatti¬ 
co è certamente di gran lunga inferiore a 
quello nella direzione opposta. 

Per tale flusso si possono sempre utilizzare 
le reti via cavo o sistemi tradizionali come le 
Poste o gli incontri periodici che sono an¬ 
che necessari ad umanizzare i processi di 
apprendimento. 

List: Dottor Pozzi, che sviluppo si prevede 
per il Telesoftware? 

Pozzi: Il limite maggiore del primo esperi¬ 
mento della diffusione del telesoftware è 
stato il fatto che i prototipi trasmessi erano 
profondamente diversi e disomogenei fra 
loro. 

Sulla base dell’esperienza trascorsa abbia¬ 
mo pensato di creare un vero e proprio pa¬ 
linsesto di rete. 

Ossia vogliamo creare una vera e propria 
rete informatica che preveda l’esistenza di 
varie rubriche mirate a “target” diversi, e 
come destinazione, e come contenuto. 

La programmazione di rete potrebbe ad 
esempio avere questo sviluppo: 

-mattino: rubriche a carattere prevalente¬ 
mente didattico e formativo; 

-primo pomeriggio: rubriche dedicate al 
tempo libero; 

-tardo pomeriggio e sera:rubriche specia¬ 
lizzate a carattere informativo/culturale. 
Abbiamo intenzione di creare una rubrica 
chiamata “HELP/TV” i cui contenuti saran¬ 
no integrati ed integrabili a quelli della nor¬ 
male programmazione televisiva con tra¬ 
smissione di software relativo ai contenuti 
ed agli obiettivi di particolari programmi te¬ 
levisivi. 

Manderemo in onda software che va dal 
softwre di utility (programmi di gestione per 
la casa); a quello di gestione (programmi 
per ordinare ad esempio dati sportivi), a 
software applicativo, video-games e invie¬ 
remo files che comporranno un rotocalco 
di cultura giovanile. 

Concludiamo questa panoramica del tele¬ 
software con queste parole del dottor Poz¬ 
zi: “Il calcolatore deve diventare lo strumen¬ 
to di aggregazione di diversi mezzi espres¬ 
sivi, di strategie didattiche diverse e tra loro 
complementari”. 

Prossimamente vi parleremo del radio-soft- 
ware, il parente povero del telesoftware e vi 
diremo come si riceve. 
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Pi PSD reA/ rt 


di FABRIZIO TAGLINO 

Pubblichiamo la seconda e conclusiva 
parte dell’articolo che illustra le caratteri¬ 
stiche del pacchetto software per Archi - 
medes, PIPEDREAM , un integrato molto 
sofisticato che unisce alle funzioni dello 
spreadsheet quelle di un wordprocessor e 
di un database 


Seconda Parte 


assiamo ad analizzare le 
| opzioni una per una, proce- 

| dendo nell’ordine con cui 

queste sono disposte nella 
» barra orizzontale, cioè: Files, 

Edit, Layout, Print, Blocks e Cursor e vedia¬ 
mo quali funzionalità sono messe a dispo¬ 
sizione da ognuna di esse. La prima opzio¬ 
ne (Files) è quella che senz’altro presenta le 
caratteristiche più interessanti di tutte le al¬ 
tre, ed è quella che permette di eseguire le 
normali operazioni di caricamento e di sal¬ 
vataggio dei dati ma in più anche qualche 
altra cosa... 

Selezionando Options per esempio è possi¬ 
bile settare i parametri di default del Pipe- 
dream: priorità di calcolo (per riga o per co¬ 
lonna) nello sheet, numero di cifre decimali, 
formato della data (inglese o americana), i 
"leading characters” e i “trailing charac- 
ters", cioè i caratteri (, $, o altro...) che il Pi- 
pedream visualizzerà a richiesta rispettiva¬ 
mente prima o dopo le espressioni numeri¬ 
che, e altre ancora. 
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Lavorando sul monitor a colori è anche 
possibile la scelta dei colori del foglio, del 
testo, dei menu, etc. 

Da sottolineare la possibilità di salvare le 
nostre scelte in un file cui daremo il nome 
S.PIPED.INI con il fine di farle considerare 
dal Pipedream come opzioni di deafult. 
Comoda è anche la possibilità di lavorare 
con documenti “multi-file”, soprattutto 
quando si vogliono fondere in un unico do¬ 
cumento piu” sheets in qualsiasi ordine. 
La procedura da seguire prevede la crea¬ 
zione di una directory L in cui salveremo un 
documento contenente la lista dei files che 
intendiamo collegare. 

Potremo quindi saltare, in fase di editing, 
da uno sheet a un altro tramite le opzioni 
che figurano nel secondo blocco del menu 
Files. 

Per concludere con questo primo menu ci¬ 
tiamo l’opzione “Macro file” che consente 
l’uso di liste di comandi pre-definite e l'op¬ 
zione “Help". 

Il secondo menu di cui disponiamo è l’Edit, 
che presenta le funzioni di editing tipiche 
dei wordprocessor e degli spreadsheet: 
cancellazione/inserimento di caratteri, ri¬ 
ghe o colonne e modifica delle espressioni 
numeriche. 

Il terzo menu attivabile è il Layout, indispen¬ 
sabile per definire alcune delle caratteristi¬ 
che delle celle che compongono il foglio di 
lavoro: allineamento del testo, rappresenta¬ 
zione dei numeri negativi, numero di cifre 
decimali, inserimento dei “trailing/leading 
characters", i margini e la grandezza delle 
righe e delle colonne dello sheet. 

Ma nel menu Layout è anche rintracciabile 
una “simpaticà opzione non molto diffusa 
nei wordprocessor (di più invece negli 
spreadsheets): ci riferiamo alla “Fix row/co- 
lumn” che consente di fissare una porzione 
di schermo lasciando che solo la restante 
parte di questo scrolli durante il lavoro; la 
cosa si rivela preziosissima anche utilizzan¬ 
do il Pipedream come database. 

Attiviamo ora il menu Print, aH’interno del 
quale trovano posto tutti gli “stili di stam¬ 
pa” (underline, bold, italic, etc.), i parametri 
di stampa, ma soprattutto la configurazio¬ 
ne della stampante, selezionando la quale 
è possibile scegliere/modificare il driver ne¬ 
cessario. 

Il penultimo menu (Blocks) è forse il più 
usato, per via delle indispensabili funzioni 
che contiene: come il nome indica, si lavora 
sui blocchi, potendo (e dovendo) cioè pri¬ 
ma “marcare” una porzione del foglio, e 
poi eseguire sul blocco così selezionato 


^ ^ / ' r ,y / . /s/ rs/s / /■ 4 /ys /s-tsssry/' 

^-IKtyoia ip"V mvlu>\ 



operazioni di copia, spostamento, cancel¬ 
lazione ma anche di sort (ordinamento), 
utilissimo se lavoriamo su dati provenienti 
ad esempio da un database o su liste di no¬ 
mi, indirizzi, etc.. 

Sempre nel menu Blocks troviamo le funzio¬ 
ni di ricerca/sostituzione di stringe nel testo 
ed altre che consentono di operare in do¬ 
cumenti misti, contenenti cioè testo e celle 
di spreadsheet. 

Chiudiamo l’analisi dei menu con l’ultimo, il 
Cursor menu, che contiene semplici ma utili 
funzioni che operano sul cursore. 

Queste riguardano per lo più lo spostamen¬ 
to "veloce” del cursore nel foglio: pri¬ 
ma/ultima colonna, parola preceden¬ 
te/successiva, salto ad una cella. 

In più, in questo menu trovano posto anche 
le opzioni di definizione dei “function keys” 
e dei tasti “normali" (che consentono di as¬ 
segnarvi una stringa o di ripristinarne la 
normale “funzione”). 

Per concludere ci sembra importante sotto- 
lineare la presenza di funzioni di tipo stati¬ 
stico utilizzabili all’interno del nostro foglio 
tutte rintracciabili nelle finestre di Help - e di 
quelle che consentono di lavorare con il Pi¬ 
pedream come se fosse un database (vedi 
Max, Min, Average, ...) oltre naturalmente 
alle funzioni matematiche e finanziarie che 
in uno spreadsheet non possono mancare. 
Per quanto riguarda la compatibilità con 
altri prodotti il Pipedream merita un’atten¬ 
zione particolare. Infatti, è possibile carica¬ 
re e salvare i dati in vari formati: PD, LOTUS 
1-2-3 ed ASCII, e questo permette di poter 
utilizzare i file così creati con altri pacchetti 
software di altri sistemi o deH’Archimedes 
stesso. Una particolare attenzione è stata 
rivolta alla compatibilità con prodotti MS 
DOS. Infatti, la possibiltà di salvare i dati in 
formato 1-2-3 o ASCII a seconda che si stia 
utilizzando il PD come foglio elettronico o 
come wordprocessor e la possibilità di tra¬ 
sferire questi file dall’Archimedes all’MS 
DOS e viceversa utilizzando un programma 
chiamato “PUTFILE” disponibile per l’Ar- 
chimedes, permettono di poter trasportare 
facilmente questi file in ambienti molto dif¬ 
fusi come Wordstar, Word, Lotus 1-2-3 ed 


altri, facendo solo qualche piccola modifi¬ 
ca. E questo è certamente un grande van¬ 
taggio considerando che così si evita di do¬ 
ver reinserire grosse quantità di dati. 

Una grande compatibilità si ha anche con i 
prodotti del Master e del PC128S di cui l’Ar- 
chimedes rappresenta il fratello maggiore. 
Infatti, è possibile caricare direttamente da 
PD documenti creati col VIEW o col VIEW 
PROFESSIONAL con ottimi risultati. Inoltre, 
utilizzando un programma in Basic presen¬ 
te nel dischetto del PD e chiamato 
“sheetpd" e con qualche piccolo artificio è 
possibile anche trasferire dei file dal View- 
sheet. 

Ed ancora, è assicurata la possibilità di tra¬ 
sferire dei file creati col Viewstore. 

Tutto questo, comunque, è spiegato in det¬ 
taglio nel file “convert" presente nel di¬ 
schetto e possiamo garantire personal¬ 
mente sui risultati avendo fatto noi stessi 
delle prove. 

Discorso a parte va fatto per il portatile Z88 
visto daH’Archimedes come memoria di 
massa esterna (se collegato con questo 
tramite il BBC-Link kit, consistente in un ca¬ 
vo e in una eprom per lo Z88) e in grado di 
lavorare direttamente sui file generati dal 
Pipedream disponendo esso stesso di una 
sua versione del programma. 

L’importanza di questa compatibilità risie¬ 
de nel fatto che in questo modo si potrà uti¬ 
lizzare il Pipedream sullo Z88 sfruttando i 
vantaggi offerti da un portatile e poi conti¬ 
nuare il lavoro sul nostro Archimedes senza 
nessun problema; inoltre dobbiamo ricor¬ 
dare che lo Z88 dispone di kits di trasferi¬ 
mento dati da e per MS-DOS e Mac... 

In conclusione abbiamo parlato e “usato 
un pacchetto molto interessante, decisa¬ 
mente facile ed efficace, dotato di grande 
flessibilità e per questo utilizzabile in una 
quantità e varietà di situazioni che difficil¬ 
mente potremmo circoscrivere. L’unico 
"rimprovero” (che non toccherà assoluta- 
mente i tradizionalisti o gli utenti di prodotti 
blasonati su MS-DOS) è per il non aver pre¬ 
visto l’uso del mouse e delle icone, cosa che 
avrebbe completato senz’altro un lavoro 
già ben confezionato. 
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ELIMINAZIONE 


DI GAUSS 


di STEFANO DI ZENZO 

Il programma LIST—GAUSS consente la 
risoluzione di sistemi lineari di equazioni 
con un numero di incognite limitato solo 
dalla memoria del calcolatore 


A = 


FASE N 1 

Se a n = 0, mediante uno scambio di righe 
si porta al posto di a n un elemento non nul¬ 
lo. 

Quindi si sottrae alla riga k-ma (k = 2,3,..,n) 
la prima moltiplicata per una costante p k1 
= a k1 / a n sostituendo così gli elementi di 
AB con i seguenti: 


a kl = a ki -a,; p kl 

(k = 2, 3,.. ., n 
b„ = b k - b,- p k1 


i = 1,2.n) 


m m tilizzando il metodo dell’eli- 
4 ■ minazione di Gauss che tra- 

| ■ sforma una generica matrice 

quadrata in una tridiagonale 
superiore (cioè con tutti gli 
elementi sotto la diagonale principale nulli) 
è possibile ottenere risoluzioni di sistemi li¬ 
neari con un grande numero di incognite. 
Le caratteristiche di questo metodo sono 
l'ottima precisione dei risultati e la facilità 
dell'algoritmo; per contro non è estrema- 
mente veloce (calcola un sistema 100x100 
in 138”, in BASIC ovviamente, tempo molto 
contenuto ma non imbattibile). 


TEORIA DELL ALGORITMO 

Sia dato un sistema di n incognite con n 
equazioni lineare 

a n x i + a .= x 2 + • • ■ + a, n x n = b, 
a ,, x , + a 2z x 2 + • ■ ■ + a 2 „ x „ = b 2 


a n, X , + a n2 X 2 + ' • ■ + a „n X n = b 

m 1 n2 C- nn n n 

in esso si distinguono la matrice A(nxn) dei 
coefficienti, il vettore B(nxl) dei termini noti 
e il vettore X(nxl) delle incognite. 


X = 


la matrice AB caratteristica del sistema è: 


a,i a 12 . . . a 1n b, 


a 2 n b 2 


AB 


a nl a n? . . . a nn b 

ni n 2 nn n 

Se in un sistema scambio due equazioni o 
sommo ad una un’altra moltiplicata per 
una costante ottengo un sistema con diffe¬ 
rente matrice AB, ma del tutto equivalente 
nelle soluzioni. 

Il metodo di eliminazione di Gauss sfrutta 
queste proprietà. 


in tal modo la matrice AB diventa: 


a,, a, 2 • ■ • a , n b’, 


0 a. 


a 2n b 2 


AB = 


0 a n2 . . . a nn b' n 

FASE N. 2 

Se a 22 = 0 (nella nuova matrice AB), me¬ 
diante lo scambio tra la 2a riga e una riga r- 
ma (con r= 3,4... n) si porta al posto di a 22 
= 0 un elemento non nullo. Quindi si sot¬ 
trae alla riga k-ma (k=3,4 ... n) la seconda 
moltiplicata per p k2 = a k2 /a. 22 sostituendo 
con ciò gli elementi di AB con: 


a k, “ a k, ‘ a 2, Pk2 


(k = 3, 4, . . . , 
b k = b k - b 2 p, 


= 2, 3, 


così la matrice diventa: 


a ,i a 12 a , 3 . . . a 1n b , 


0 0 a. 


■ a 2„ b’ 
• ab’ 
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0 0 a n3 . . . a nn b’ n 


FASE l-MA (i = 1,2 ... n-1) 

Come le precedenti. 

Si controlla che a iti sia non nullo (eventual¬ 
mente si invertono le righe). 

Quindi si sottrae alla riga k-ma (k = i +1... n) 
la i-ma moltiplicata per p kl = a^/a,, sosti¬ 
tuendo agli elementi di AB i seguenti: 

a kj = a kj - a„ p, 

(k = i + 1 ... n j = i,i + 1 . .. n) 
b k = b k - b, p kl 

Dopo n-1 fasi la matrice iniziale AB sarà di¬ 
ventata: 

3ii a 12 a, 3 • ■ • a 1n b 1 
0 a 22 a 23 . . . a 2n b 2 


o 0 0 . . . a nn b’ n 

tridiagonale superiore. 

Con questo noi abbiamo trasformato il si¬ 
stema iniziale nell’equivalente: 

a,, x, + a 12 x 2 + . . . + a ln x n = b, 
a x + a x ? + -fax = b 

a 21 ! a 22 C. • • • a 2n n U 2 


a, x + a,xo + + a x = b 

n 1 1 u n2 C. nn n n 


dove, bisogna ricordarsi, i coefficienti sono 
diversi da quelli iniziali in quanto trasforma¬ 
ti dalle varie fasi. 

Le soluzioni si ottengono con metodo ricor¬ 
sivo all’indietro: 


x , = (b t -a nl x n -a n ^,x n i ... - a 12 x a ) 

facendo attenzione che bisogna trovarle in 
questo ordine poiché per trovare x n _-, serve 
aver trovato x n e così via. 

Questo è il metodo basilare. 

Ad esso si può aggiungere la tecnica di pi- 
votting parziale. 

Essa consiste nel fare in modo che l’ele¬ 
mento a H sia il più grande possibile. 

Si cerca cioè di scambiare la i-ma riga con 
una successiva in modo di portare nel po¬ 
sto di a„ un elemento maggiore (in valore 
assoluto). 

Questo limita la propagazione di errori do¬ 
vuti al troncamento dei numeri decimali. 
Infatti ogni riga, in tutte le fasi, viene molti¬ 
plicata per un coefficiente p ki nel quale 
compare a denominatore proprio a H . 

Se ai, è troppo piccolo si ha una divisione 
quasi per zero con amplificazione degli er¬ 
rori accumulati. 

Il programma LIST—GAUSS utilizza anche 
questa modifica. 


10REM >$.LIST_GAUSS 

20REM *** PROGRAMMA PER LA RISOLUZIONE DEI SISTEMI LINEARI MISTI CON IL 
30REM *** METODO DI ELIMINAZIONE DI GAUSS CON PIVOT PARZIALE *** 

40 REM *** by STEFANO DI ZENZO -> Marzo 1989 *** 

50 

60MODE 0 
70 

80REM *** Acquisisco dati *** 

90REM *** a(y,z) -> matrice coefficienti *** 

100REM *** b(y) -> vettore colonna termini noti *** 

110REM *** x(y) -> vettore riga variabili *** 

120 

130INPUT ”Numero di incognite: ”n% 

140DIM a(n%,n%),b(n%),x(n%) 

150CLS 

160PRINT "INSERIRE I COEFFICIENTI." 

170FOR j%=l TO n% 

180 FOR i%=l TO n% 

190 PRINT "a";j%;i%;"= ";:INPUT ""a(j% f i%) 

200 NEXT i% 

210NEXT j% 

220CLS 

230PRINT "INSERIRE TERMINI NOTI." 

240FOR j%=l TO n% 

250 PRINT "b";j%;"= ";:INPUT f, "b(j%) 

260NEXT j% 

270CLS 
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280 

290REM *** Inizio trasformazione della matrice [AB] *** 

300REM *** Eliminazione di Gauss *** 

310FOR i%=l TO n%-l 

320 PROCcontrol 

330 FOR k%=i%+l TO n% 

340 pk=a(k%,i%)/a(i%,i%) 

350 FOR j %=i% TO n% 

360 a(k%,j%)=a(k%,j%)-a(i%,j%)*pk 

370 NEXT j% 

380 b(k%)=b(k%)-b(i%)*pk 

390 NEXT k% 

400NEXT i% 

410 PROCcontrol2 
420 

430REM *** Inizio calcolo delle x *** 

440x(n%)=b(n%)/a(n%,n%) 

450FOR i%=n%-l TO 1 STEP -1 
460 x(i%)=b(i%) 

470 FOR j %=i%+l TO n% 

480 x(i%)=x(i%)-a(i%,j%)*x(j%) 

490 NEXT j% 

500 x(i%)=x(i%)/a(i%,i%) 

510NEXT i% 

520 

530REM *** Stampo risultati *** 

540FOR j%=l TO n% 

550 PRINT"x";j%;"= ";x(j %) 

560NEXT j% 

570 

580END 

590 

600REM *** Controllo per evitare la divisione per zero *** 

610REM *** Tecnica di pivot parziale *** 

620DEFPROCcontrol 
630LOCAL j%,max%,ok% 

6 4 0ok%=FALSE 
650max%=i% 

660FOR j%=i%+l TO n% 

670 IF ABS(a(j%,i%))>a(max%,i%) THEN 
680 max%=j% 

690 ok%=TRUE 

700 ENDIF 
710NEXT j% 

720IF ok% THEN 

730 FOR j%=i% TO n% 

740 SWAP a(i%,j%),a(max%,j%) 

750 NEXT j% 

760 SWAP b(i%),b(max%) 

770ENDIF 

780IF ABS(a(Ì%,Ì%))<.00001 THEN 

790 PRINT "SISTEMA NON RISOLVIBILE." 

800 STOP 

810ENDIF 
820ENDPROC 
830 

840REM *** Verifica che non ci siano zeri sulla diagonale principale 
850REM *** e che quindi il sistema sia risolvibile *** 

8 6 ODEFPROCcontro12 
870LOCAL j% 

880FOR j%=l TO n% 

890 IF ABS(a(j%,j%))<.000001 THEN PRINT "SISTEMA NON RISOLVIBILE":STOP 
900NEXT j% 

910ENDPROC 


LIST 6/89 


39 









ELABORAZIONE VIDEO 


SUPER MSX 2 & 
VIDEO DIGITALI 


di OSVALDO CONTENTI 


Questa puntata è interamente dedicata al¬ 
la presentazione di: “EFFETTISPECIALI2”, 
logica evoluzione di “E.S. 7 ”, con la princi¬ 
pale caratteristica di poter “manipolare ” 
le immagini traendole direttamente dai 
picture-files salvati su disk 


Ilrima di cominciare l’esposi- 
| zione di: “EFFETTI SPECIALI 

mi 2”, è bene che descriva ai let- 

tor j | e differenze fra questo e 
™ il precedente E.S., la cui pre¬ 
sentazione è apparsa sul LIST 1/2 del 1989. 
E.S.1 era un programma pensato per quegli 
utenti di un MSX 2 che non posseggono im¬ 
magini digitalizzate, il programma infatti 
conteneva una lunga serie di linee DATA 
racchiudenti in pratica un vero picture-file 
in versione ASCII, giacché ogni carattere 
ASCII impiegato, o meglio il suo codice nu¬ 
merico, per l’elaboratore rappresentava un 
pari codice colore da immettere sullo scher¬ 
mo. 

Ciò creava la possibilità di diversificare ma¬ 
nualmente l'immagine, apponendo le modi¬ 
fiche proprio in quelle stesse linee DATA, gli 
utenti in “difetto” di immagini hanno ben 
accolto questo aiuto, ma ora è arrivato il 
tempo di presentarvi E.S.2, il quale, come 
già accennato nel cappello, offre in più, 
con altre novità, il potere di richiamare 
qualsiasi immagine codificata su disk, be¬ 
ninteso, anche quelle prodotte con il VI- 
DEOGRAPHICS della Philips. 



E.S.1 rimane comunque sempre ottenibile 
attraverso il servizio programmi a lire 
15.000. 


stampati con COPY, quindi non più pixel 
per pixel come succedeva per E.S.1, e que¬ 
sto significa anche una stampa in video in 
capo a pochi secondi, eccezion fatta per 
l’effetto box chiuso, il quale comprende un 
lato superiore che per la sua particolarità 
deve essere trattato punto per punto. 


AVVIAMENTO DEL PROGRAMMA 

Fra i tanti files che troverete nel dischetto 
(degli altri ne parleremo più avanti), quello 
degli effetti speciali porta il nome di: SPE¬ 
CIAL 2. 

Lo caricherete con un normale: 
LOAD“SPECIAL2”,R e questo si autoavvie- 
rà. 


“EFFETTI SPECIALI 2”: 

IL PROGRAMMA MENU E RICHIESTA PARAMETRI 


L’intera gamma degli E.S. presentata anche 
nel MENU del programma stesso sarà la se¬ 
guente: 

(1) Effetto box chiuso 

(2) Copia normale 

(3) Arcuatura lato verticale conca¬ 
va/convessa 

(4) Arcuatura lato verticale conves¬ 
sa/concava 

(5) Inclinazione lato verticale a 135 gradi 

(6) Inclinazione lato verticale a 45 gradi 

(7) Allungamento immagine (del doppio) 

(8) Allargamento immagine (del doppio) 

(9) Ingrandimento totale effetto tela (del 
doppio) 

(10) Ingrandimento totale normale (del 
doppio) 

(11) Arcuatura lato orizzontale convessa 

(12) Arcuatura lato orizzontale concava 

(13) Ripiegatura in 3 direzioni 
(SUD-EST/SUD/SUD-OVEST) 

(14) Inclinazione lato orizzontale a 135 gra¬ 
di 

(15) inclinazione lato orizzontale a 45 gradi 

(16) Effetto box aperto 

Gli effetti dal 2 al 16 saranno interamente 


Avviato il programma e dopo il titoletto, ol¬ 
tre alla già citata lista degli effetti speciali 
più un memo-tastiera, una serie di INPUT vi 
richiederanno dei semplici parametri; ecco¬ 
vi la lista delle richieste: 

- Effetto numero (1-16): 

digitate la cifra corrispondente all’effetto 
(poi RETURN) 

- Colonna e riga iniziali di prelievo?: 
sapendo di disporre di 256 colonne (0-255) 
per 212 righe (0-211 ), digitate le due cifre di¬ 
vise da una virgola e avrete stabilito il punto 
superiore sinistro da prelevare (poi RE¬ 
TURN) 

- Colonna e riga finali di prelievo?: 
digitate altre due cifre divise da virgola per 
il punto inferiore destro (poi RETURN) 

- Colonna e riga iniziali di deposito?: 
digitate le due cifre divise da virgola per la 
stampa del punto più in alto a sinistra del¬ 
l’effetto scelto (poi RETURN) 

- Colore sfondo e cornice (0-255)?: 
digitate un qualsiasi codice colore (poi RE¬ 
TURN) 

- Nome del picture-file da caricare?: 
digitate il nome-file compresa l’estensione, 
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Così nel caso delle INPUT del MENU, ogni 
valore errato, fuori dai canoni stabiliti, por¬ 
terà ad una nuova richiesta di INPUT. 

Nel caso, invece, di INPUT del file da carica¬ 
re (azione MENU), lo schermo diverrà GIAL¬ 
LO riformulandovi la richiesta nei seguenti 
casi: disk non collocato; disk non collocato 
nel drive A; file non presente nel disk; file 
non corrispondente ad un picture-file. 

Altri possibili errori utente, potranno verifi¬ 
carsi solo tramite il comando BSAVE (azio¬ 
ne tasto BS), in questo ambito l'immagine 
NON VERRÀ' SALVATA per uno dei seguen¬ 
ti motivi: disk non collocato; disk non pre¬ 
sente nel drive A; disk protetto; disk pieno. 
In tutti questi casi, il computer emetterà un 
prolungato BEEP di tono grave, ma il pro¬ 
gramma non salterà e quindi potrete in 
qualsiasi momento rimediare all’errore. 
Naturalmente in caso di errato BSAVE, il 
contatore NF non si autoincrementerà. 


ma non date il RETURN prima di aver collo¬ 
cato il disk nel drive A. 

Avendo assolto a tutte le richieste di input, il 
picture-file verrà caricato e l’elaboratore 
procederà immediatamente alla stampa 
dell'effetto speciale scelto. 


USO DE! TASTI IN “SPECIAL 2” 

Sono solo 4 i tasti di gestione di questo pro¬ 
gramma, esaminiamoli uno per uno por¬ 
gendo particolare attenzione alla funzione 
del tasto BS, incaricato di comandare il 
BSAVE, ovvero il salvataggio delle immagini 
prodotte dagli effetti speciali. 

- Tasto 1: fornisce la stampa al NEGATIVO 
dell’intera immagine in video, per tornare al 
POSITIVO ripremere lo stesso tasto. 

- Tasto RETURN; per tornare al MENU di 
scelta parametri. 

- Tasto ESC: per dare l’END al programma, 
ovverosia uscire da esso. 

- Tasto BS: per salvare gli E.S. (azione BSA¬ 
VE). 

Proprio per quanto riguarda l’azione di sal¬ 
vataggio vi sono da rimarcare alcune cose 

(a) Il primo nome del file da salvare sarà 
ESPI.PIO, e con successivi salvataggi solo 
la cifra di questo nome cambierà, aumen¬ 
tando ogni volta di UNA unità. 

(b) Quando riuserete il programma la varia¬ 
bile NF alla linea 200 del programma dovrà 
essere riassegnata con un numero più alto 
di quelli sino a quel momento utilizzati. 

Per i soli OPERATORI, ecco in breve la sem¬ 
plice operazione da effettuare: 

(1) Caricare il programma con: 


LOAD"SPECIAL2" (poi RETURN). 

(2) Digitare: LIST 200 (poi RETURN). 

(3) Portare il cursore sul numero da mutare 
(ora a ZERO) e digitare un nuovo numero, il 
resto della linea essendo una REM si può 
senz’altro defalcare premendo di continuo 
il tasto DEL e a pulizia completata, premere 
il TASTO FUNZIONE F5-10 per dare l’avvio 
al programma. 


ERRORI DELL UTENTE 

Nel programma i possibili errori causati dal¬ 
l’utente sono gestiti sia da delle ON ERROR 
che da delle semplici IF..THEN. 


“SPECIAL 2" A CASA VOSTRA 

Come dicevo, il disk con "SPECIAL 2" (disk 
a doppia faccia doppia densità) è ben lungi 
dal contenere solo questo programma, in¬ 
fatti al suo interno troverete anche 5 magni¬ 
fici super-ingrandimenti dell’insieme di 
Mandelbrot, per intenderci come quelli raf¬ 
figurati nel volume: "La bellezza dei frattali’’ 
edito da Boringhieri. 

I nomi di questi picture-file di Mandelbrot 
sono: FRI.PIO; FR2.PIC; FR3.PIC; FR4.PIC 
ed FR5.PIC. 

Poi troverete ancora 2 immagini codificate, 
elaborate da mè stesso, che modestamente 
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presento al vostro giudizio; i nomi file di 
queste altre immagini sono: SOLARE.PIC e 
COMPOSI.PIO. 

Per finire, il dischetto contiene anche il file: 
VISIONE (caricarlo col solito LOAD), per fa¬ 
vorire una rapida visualizzazione dei pictu- 
re-file vostri, o quelli stessi forniti nel disk. 
Come sempre il disk dovrà essere richiesto 
tramite il SERVIZIO PROGRAMMI (vedi ulti¬ 
ma pagina VERDE dei programmi), scucen¬ 
do dal borsellino solo 15.000 Ire 
Ho comunque premura di far rilevare che il 
disk: “EFFETTI SPECIALI 2' non contiene 
alcun file di testo, per cui queste pagine 
vanno considerate a tutti gli effetti come 
GUIDA ALL’USO del suddetto programma, 
per cui conservate questo numero o richie¬ 
detelo nel caso contrario. 


LA SCELTA DELI INQUADRATURA 
IN SPECIAL 2 

La maggior duttilità di E.S.2 rispetto al suo 
predecessore, si evidenzia anche nel fatto 
di poter prelevare ed inquadrare a piaci¬ 


mento la parte di immagine desiderata, ma 
è ovvio che per la manipolazione stessa 
delle immagini, queste potrebbero fuoriu¬ 
scire dai limiti dello schermo in forza pro¬ 
prio della loro libertà d’uso. 

Ed anche se ciò verrà sempre controllato 
dall’elaboratore (nessuna uscita dal pro¬ 
gramma), è bene che vi esponga almeno 
un esempio di E.S., il numero 16, proprio 
nella scelta dei parametri: 

- input 1=16 = numero effetto 

- input 2 = 100,10 = angolo sup. sin. di 
prelievo 

- input 3 = 160,70 = angolo inf. dest. di 
prelievo 

- input 4 = 60,90 = angolo sup. sin. di de¬ 
posito 

- input 5 = 16 = codice colore sfondo e 
cornice 

- input 6 = SOLARE.PIC = nome del pictu- 
re file 

Questi parametri faranno si che il BOX 
aperto si situi proprio al centro dello scher¬ 
mo; in ogni caso dopo un po’ di pratica tut¬ 
to diverrà molto semplice anche con altri ef¬ 
fetti speciali. 


INVITI E RINGRAZIAMENTI 

Prima di chiudere questa puntata vorrei rin¬ 
graziare tutti gli appassionati dell’MSX 2 
che dall’apparire del prima puntata di que¬ 
sta rubrica hanno salutato l’evento repu¬ 
tandolo salvatore di un vuoto di servizi per il 
nostro elaboratore. 

Con missive, telefonate e contatti del terzo 
tipo, ho potuto constatare che siete davve¬ 
ro in tanti; è stata quasi una specie di solle¬ 
vazione, un “People at thè Power" che 
esprimeva il bisogno di autodecretarsi co¬ 
me i prosecutori di una bella favola chia¬ 
mata MSX, troppo spesso insidiata, però, 
dal mostro tecnologico, tentatore di ogni 
altra serie di computers, come se dopo 3 
mesi dovessimo buttare quelli appena ac¬ 
quistati. 

E allora riprendiamoci il potere di riorganiz¬ 
zare il NUOVO SOFTWARE; io farò la mia 
solita modesta parte, ma voi inviate i vostri 
programmi a LIST, lanciateci idee, informa¬ 
teci dei vostri MSX CLUB, e le circostanze 
appariranno certo più radiose, proprio per 
tutti. Ciao. 
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I FRATTALI ARCHIMEDEI 



di OSVALDO CONTENTI 

La popolazione frattale ha anche dei fra¬ 
telli archimedei , delle strane geometrie ra¬ 
mificate che invaderanno mano a mano il 
vostro schermo 


rchimede stesso avrebbe po¬ 
tuta costruirla con i mezzi a 
lui noti. 

Così ci informa il super¬ 
esperto Lucio Saffaro circa 
l’estrema ed ordinata articolazione dei frat¬ 
tali archimedei. 

Già, ed immaginate cosa avrebbe potuto ti¬ 
rar fuori Archimede utilizzando un compu¬ 
ter! 

Forse qualche teoria che noi stiamo ancora 
lambendo, come questo universo frattale 
che da un po’ di anni sta riscuotendo le giu¬ 
ste considerazioni dopo secoli di tradizione 
euclidea, intesa nel senso ristretto del termi¬ 
ne. 

Tornando più specificatamente al tema di 
questo mese, attraverso il programma inse¬ 
rito in queste pagine, avrete ancora una 
volta la possibilità di spaziare in un campo 
deirimmagine che solo l’elaboratore sa illu¬ 
strarci così particolareggiatamente. 

Inoltre, nella routine, l’inserimento mirato 
del colore, permette l’ascesa delle figura¬ 
zioni da uno stato bidimensionale ad 
un’apparenza quasi 3D. 

Ed ora ricordo quando il mio buon profes¬ 
sore di architettura mi diceva: “Per trovare 
una nuova forma architettonica, crea dap¬ 
prima tanti puzzle geometrici, ve ne sarà 
uno che ti darà lo spunto per uno spazio ra¬ 
zionale, ma insieme di spazio giocoso, 
aperto alle sorprese....”. 

Ebbene, quel che vedrete in video, vi appa¬ 
rirà talvolta come ambulacro, o come fron¬ 
da ramificata, o come dedalo inestricabile, 
o appunto come pianta architettonica di un 
ambiente ricco, mai completamente svela¬ 
to. 


Non diventerete degli artisti solo usando 
questo programma, ma quella magia di for¬ 
me inaspettate vi coinvolgerà come se lo fo¬ 
ste, la manipolazione e lo studio dei para¬ 
metri vi farà comunque possedere alcune 
chiavi della creatività. 


PROGRAMMA E PARAMETRI 

Il principio ispiratore del programma è la 
continua evoluzione di una linea che arri¬ 
vata al suo arco massimo si divide in due 
tronconi, i quali a loro volta ne possono far 
scaturire degli altri e così via. 

Il controllo e l’ampiezza di queste articolate 
immagini sarà completamente in mano vo¬ 
stra, tramite la mutazione di una serie di pa¬ 
rametri base che potranno essere diversifi¬ 
cati dai valori originali anche uno per volta. 
Vediamo questi parametri: 

- Variabile CP: (ora a 5); consente di au¬ 
mentare il numero delle articolazioni in un 


concetto di proporzionalità inversa (minore 
il valore di CP = maggiore articolazione). 

- Variabile EF: (ora a 40): decreta l’estensio¬ 
ne dell’intera figura o se volete la sua sca¬ 
la.- Variabile AF: (ora a 40): fa crescere o di¬ 
minuire l’intero Arco della Figura. 

- Variabile AG: (ora a 90): È l’angolo di 
stampa dell’intera figura. 

- Variabile S: (ora a 1): Altro parametro di 
complessità della figura. 

- Variabile CL: (ora a 15): Determina il primo 
codice colore da impiegare. 

- Variabili XI e Y1: (ora a 128 e 150): Sono le 
coordinate della parte mediana deirimma¬ 
gine, calcolate su di una risoluzione di 256 
colonne per 212 righe. 

Le suddette variabili potranno essere modi¬ 
ficate come suggerito nelle REM tra le linee 
340 e 400 del listato. 

La collocazione di tali parametri, all’interno 
della routine, è fissata tra le linee 130 e 170 
comprese. 

Naturalmente se non disponete di un ela- 
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10 REM - 

20 REM Coinputergrafica 
30 REM I FRATTALI ARCHIMEDEI 
40 REM di Osvaldo Contenti 

50 REM.- 

60 REM -Listata per MSX1-2 e 
70 REM per tutti i coinputers 
80 REM con pagina grafica. 

90 REM - 

100 SCREEN8: COLOR15,0,0:CLS 

110 REM La linea 100 per soli MSX2,stabi 

lisce una ris. 256x212,con colore di sfo 

rido nero. Con MSX1 porre SCREEN2 

120 DIM F(40> 

130 CP=5:EF=10:AF=40:AG=90 

140 S=1:GR=720 :E=.8 

150 CL=15:REM CL=codice colore 

160 L=0:M=EF*E:Z=TAN(S)*8. 1/GR 

170 Xl=128:Y1=150 

180 F(L)=0 :AG=AG-2*AF-AF 

190 AG=AG+AF*2 

200 EF=AG*Z:X=COS(EF)*M: Y=SIN(EF)*M 

210 CL=CL-1:LINE(XI,Y1)-(Xl-X,Yl-Y),CL: X 

1=X1-X:Y1=Y1-Y 

220 L=L+1:M=M*E 

230 IFM> CFTHEN180 

240 L=L-1:M=M/E 

250 EF=AG*Z:X=COS(EF)*M: Y=SIN(EF)*M 
260 CL=CL+1:LINE(XI,Y1)-(Xl+X,Yl+Y),CL:X 
1 = X1+X:Y1 = Y1 + Y 

270 F(L)=F(L)+1:IFF(L)<2THEN190 
280 AG=AG-AF 
290 IFL>0THEN240 
300 GOTO 300 

310 REM - 

320 REM PARAMETRI MODIFICABILI 
330 REM - 


340 *CP(da 2 a 20)=complessità piano 
350 ’EF(da 5 a 40)=estensione figura 
360 ’AF(da 10 a 40)=arco figura 
370 ’AG(45 ; 90 ; 135)=angolazione 
380 *S(da 1 a 100)=sviluppo 
390 ’XI;Yl=centro de11’ immagine : 

400 * (con risoluzione: 256x212) 



boratore con hi-res colore, la variabile CL 
potrà essere sostituita, nella LINE, da un 
codice colore fisso e vi assicuro che anche 
la fase monocromatica riserverà molte sod¬ 
disfazioni. 


PARLANDO DI GEOMETRIA 

Rileggendo l’articolo: Computer Designer 
del LIST n.3 del presente anno, mi sono ac¬ 
corto di essere in debito di una risposta ver¬ 
so i lettori, quella inerente alle unioni am¬ 


messe con 5 poligoni regolari; ebbene, la ri¬ 
sposta dà luogo a due sole soluzioni con: 

- (a): X = 3 Y = 3 Z = 3 K = 4 W = 4 

- (b): X = 3Y = 3Z = 3 K = 3W = 6 

Ma dove approfondire ancora lo studio dei 
poligoni? 

In verità le pubblicazioni italiane al riguardo 
sono molteplici, ma non ancora ispirate, 
come per i frattali, a fornire routine per i cal¬ 
colatori, ecco che perciò il tradurre quei 
calcoli, per i più, diviene cosa ardua, ma 
certo non impossibile, vista anche l’insi¬ 
stenza con la quale mi chiedete sempre ed 


in ogni caso di informarvi con delle note bi¬ 
bliografiche sulle novità o le misconosciute 
trattazioni in qualche modo riversabili su 
computer. 

A mio modo di vedere il MANUALE HOEPLI 
di Italo Ghersi a titolo: 

“Matematica dilettevole e curiosa”, forni¬ 
sce maggiori informazioni di un qualsiasi 
pomposo volume recente di computergrafi¬ 
ca, certo dovrete avere un qual certa confi¬ 
denza con la matematica e la geometria 
per trarne dei benefici. 

C’è poi chi dice di non riuscire a trovarlo 
questo fantomatico volume e la cosa è ca¬ 
pibile perché i manuali HOEPLI vanno sem¬ 
pre a ruba e sono anche molto ambiti dai 
collezionisti, lo so molto bene poiché ne 
posseggo anche un altro dal titolo: "FOTO¬ 
GRAFIA per i dilettanti”, edito addirittura 
nel 1918, per il quale molti appassionati si 
straccerebbero le vesti. 

In ogni caso se volete un HOEPLI, provate a 
scrivere a questo indirizzo: Ulrico Hoepli 
Editore S.p.a., Via Hoepli 5, 20121 MILANO, 
e buona fortuna. 

In ogni caso, per gli appassionati, anche 
per questo numero ho preparato una nutri¬ 
ta coda bibliografica, trattante in parte i 
frattali archimedei, ma anche temi sui poli¬ 
goni o di puro divertimento matematico. 


BIBLIOGRAFIA MINIMA 

Lucio Saffaro, Nuove operazioni sui polie¬ 
dri platonici, Annuario EST-Mondadori, 
1983 (pp.337-346). 

Lucio Saffaro, Nuovissime operazioni sui 
poliedri platonici, Annuario EST-Mondado¬ 
ri, 1986-87 (pp.323-331). 

Lucio Saffaro, Dai 5 poliedri all’infinito, An¬ 
nuario EST-Mondadori, 1976 (pp.473-484). 
Italo Ghersi, Matematica dilettevole e curio¬ 
sa, Hoepli Editore. 

Rivelli, Stereometria applicata allo sviluppo 
dei solidi e alle loro costruzioni in carta, 
Hoepli Editore. 

Catalogo illustrato: I frattali, la geometria 
dell’irregolare, vedi articolo di L. Saffaro; I 
frattali archimedei, (pp.99-105), TRECCANI 
CATALOGHI/4, Treccani Editore. 

M.Emmer, Art and Mathematics: thè Plato- 
nic Solids, in “Leonardo”, voi.15, n.4 (1982), 
pp.227-282. 

M.C. Escher; M.Emmer e altri per: Art and 

Science, Amsterdam 

1986. 

LE SCIENZE, quaderni 45, Numeri caso e 
sequenze, 1988. 
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PASCAL 



Macchina aritmetica di Pascal: 
particolare deI meccanismo 



di STEFANO TOPARINI 


Questo mese amplieremo le nostre cono¬ 
scenze per quel che riguarda rutili zzo dei 
dati. Vedremo degli esempi di come, par¬ 
tendo dai tipi semplici che abbiamo già 
definito e da altri che definiremo, sia pos¬ 
sibile costruire facilmente in Pascal dei 
nuovi tipi di dati ed in seguito delle strut¬ 
ture per organizzare i dati più complessi e 
astratti 


4 a Parte 


urante questi mesi abbiamo 
già appreso come in Pascal 
esistano dei tipi semplici di 
dati ben definiti, che chiame¬ 
remo da ora in poi tipi primi¬ 
tivi del linguaggio, per i quali esiste un insie¬ 
me di valori possibili e degli operatori che ci 
permettono di manipolarli. 

Questi tipi erano il REAL, l’INTEGER ed il 
CHAR ed avevamo preso in considerazione 
alcune delle problematiche relative al loro 
utilizzo all’interno di un programma. 

Non sono però questi gli unici tipi primitivi 
definiti in Pascal: ne esistono altri due che 
sono il tipo BOOLEAN ed il tipo puntatore. 

IL TIPO BOOLEAN 

Questo tipo di dato consente di memorizza¬ 
re un valore che può essere TRUE (vero) 
oppure FALSE (falso) e nessun altro. I più 
attenti lettori di questa rubrica si saranno 


già accorti che questo tipo “rassomiglia" 
un po’ a quella che era la condizione che 
veniva valutata all’interno di una istruzione 
condizionale IF..THEN. 

Ebbene, in realtà tutte le condizioni, come 
erano state viste nella trattazione dell’istru¬ 
zione IF, possono essere considerate come 
valori del tipo BOOLEAN: si possono quindi 
inserire i risultati di queste condizioni in una 
variabile di questo tipo. 

Per esempio è perfettamente valida una 
istruzione di assegnazione fatta come nelle 
righe che seguono 

errore := primo = secondo; 
flag := TRUE; 

in cui “errore" e “flag” sono due variabili di 
tipo BOOLEAN mentre "primo” e "secon¬ 
do” sono variabili di un qualsiasi tipo tra 
quelli già visti, al limite anche esse di tipo 
BOOLEAN. 

Facciamo una breve parentesi per ampliare 
il discorso circa i dati a questo tipo. 

Il nome dato a questo tipo deriva da quello 
del matematico britannico George Boole 
che nel secolo scorso introdusse una alge- 
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bra in cui esistevano, al contrario di quella 
che adoperiamo comunemente, solo due 
valori, 0 ed 1 oppure vero e falso o anche 
acceso e spento. 

Questa algebra, detta appunto booleana, 
ricopre un ruolo molto importante nel cam¬ 
po dell’elettronica e dell’informatica. 
Spiegare perché sarebbe lungo, ma a titolo 
di esempio possiamo dire che in elettronica 
esistono dei componenti che agiscono co¬ 
me gli operatori dell’algebra booleana su 
segnali elettrici di due soli tipi. 

Gli operatori dell'algebra booleana che ab¬ 
biamo sopra menzionato sono la somma 
logica (restituisce il valore vero se almeno 
uno degli operandi è vero, in Pascal è l’ope¬ 
ratore OR) e il prodotto logico (vero se en¬ 
trambi gli operandi sono veri, operatore 
AND) che abbiamo già incontrato, e la ne¬ 
gazione. 

In Pascal la funzione della negazione è 
svolta dall’operatore NOT di cui chiariamo 
il funzionamento: questo prende un valore 
booleano e lo trasforma nel suo opposto. 
Facciamo un esempio per chiarire il funzio¬ 
namento di questo operatore 

valore—boolean := TRUE; 
altro—valore—boolean := NOT valo¬ 
re—boolean; 

La seconda assegnazione non fa altro che 
memorizzare l’opposto di di TRUE (ossia 
FALSE) nella variabile “altro—valo¬ 

re—boolean”: se la prima variabile avesse 
avuto come valore FALSE, alla seconda sa¬ 
rebbe stato assegnato il valore TRUE. 
Come si può vedere l’algebra booleana 
non è una entità astratta ma entra prepo¬ 
tentemente in gioco in un linguaggio di pro¬ 
grammazione, e questo vale in generale e 
non solo per il Pascal, nella valutazione di 
ogni espressione logica. 

Tornando al linguaggio vero e proprio pos¬ 
siamo dire che le variabili BOOLEAN posso¬ 
no risultare utili, se non indispensabili, in 
molti casi e possono essere adoperate per 
agevolare la lettura di un programma come 
nel seguente frammento in cui “errore” è 
una variabile BOOLEAN 

IF errore 

THEN WRITELNfAttenzione c”è un errore!’) 
ELSE WRITELN(‘Tutto a posto.’); 

in cui senz’altro risulta più chiaro, al lettore 
umano perché per il computer è la stessa 
cosa, quale sia il comportamento del pro¬ 
gramma, piuttosto che avere per esempio 


IF (x<>0) AND (k = ‘A’) OR (y<2) 

THEN ... 

ELSE 

in cui la condizione sulla base della quale 
l’istruzione IF opera è di difficile interpreta¬ 
zione (questo è solo un esempio ma non è 
poi lontano da quella che è la realtà della 
cose): in questo caso, per passare dal se¬ 
condo caso al primo basterebbe fare una 
assegnazione del tipo 

errore := (x<>0) AND (k = 7V) OR (y<2); 

che preceda il primo frammento, per otte¬ 
nere il un listato facilmente leggibile. 


Il TIPO PUNTATORE 

Del tipo puntatore daremo solo alcune bre¬ 
vi notizie perché la spiegazione della sua 
utilità e del suo uso richiederebbero troppo 
tempo ed esulerebbe da quelli che sono i fi¬ 
ni di questo corso che è di carattere intro¬ 
duttivo. Per dare l’idea di che cosa sia un 
puntatore possiamo dire che tramite questo 
tipo viene ad essere rappresentato un indi¬ 
rizzo di una cella di memoria dell’elaborato¬ 
re: a beneficio di coloro i quali non cono¬ 
scono la struttura della memoria di un cal¬ 
colatore possiamo dire, per semplicità, che 
tutti i programmi, una volta immessi in un 
computer, vengono tenuti in una zona che 
è la memoria "ad accesso casuale”, la co¬ 
siddetta RAM, che praticamente non è altro 
che una serie di circuiti integrati; questa 
RAM, in cui oltre alle istruzioni del program¬ 
ma in linguaggi macchina risiedono anche 
i dati che il programma utilizza o produce, 
può essere immaginata come una serie di 
celle singolarmente e univocamente identi¬ 
ficate da un numero di ordine progressivo. 
È appunto questo numero che viene memo¬ 
rizzato in una variabile di tipo puntatore: il 
Pascal ci evita il lavoro di doverci preoccu¬ 
pare dei particolari relativi allo hardware 
della macchina che utilizziamo in quanto 
questo numero, grande o piccolo che sia, 
non è mai noto al programmatore in manie¬ 
ra diretta. 

Questo tipo permette al programmatore 
esperto di valicare i limiti, i vincoli che il lin¬ 
guaggio gli pone e di poter in libertà mani¬ 
polare direttamente i dati in memoria senza 
dover adoperare le strutture già presenti nel 
Pascal ma anzi creandone nuove di volta in 
volta. 

Tutto ciò permette di ottimizzare sia lo spa¬ 


zio in memoria per i dati che le risorse di 
calcolo per la manipolazione degli stessi 
consentendo inoltre di adattare la struttura 
dei dati al particolare problema da risolvere 
onde ottenere il massimo rendimento possi¬ 
bile da parte del programma. 


TIPI DI DATI 

DEFIN IBI II DALL 7 UTENTE 

Con il tipo puntatore abbiamo terminato la 
rassegna dei tipi primitivi del linguaggio ma 
questo non è tutto per quel che riguarda i ti¬ 
pi di dato. 

Il Pascal infatti ci permette di definire dei 
nuovi tipi di dati in tutto e per tutto equiva¬ 
lenti, in fase di stesura dei programmi, a 
quelli definiti dal linguaggio e che ci con¬ 
sentono di soddisfare le esigenze che si 
vengono a creare durante la fase di proget¬ 
tazione nel caso di problemi in cui i dati da 
utilizzare non siano necessariamente nu¬ 
meri o caratteri ma, ad esempio, nomi di og¬ 
getti. 

Si tratta quindi di nuovi tipi con valori per i 
quali sarebbero necessari degli artifici di 
programmazione durante la fase di memo¬ 
rizzazione che ci vengono in questo caso 
evitati dal Pascal. 

I tipi di nuova creazione possono essere 
realizzati in due distinte maniere e precisa- 
mente: 

- come sottoinsieme di altri tipi di dati; 

- come tipi non riconducibili a quelli visti. 

La creazione di un nuovo tipo avviene ma¬ 
terialmente tramite una dichiarazione di ti¬ 
po secondo lo schema 

TYPE nome—tipo = <descrizione>; 

in cui “nome—tipo" è un identificatore per 
cui valgono le stesse regole valide per i no¬ 
mi delle variabili e delle costanti ( deve co¬ 
minciare con una lettera, non ci devono es¬ 
sere al suo interno segni di interpunzione e 
così via). 

Questa dichiarazione di tipo deve essere ri¬ 
gorosamente posta all’interno di un pro¬ 
gramma tra la eventuale dichiarazione di 
costanti e quella delle variabili: è ovvio che 
la dichiarazione di tipo preceda quella delle 
variabili perché se noi proviamo a dichiara¬ 
re una variabile di un tipo che ancora non 
esiste l’implementazione del Pascal non è 
in grado di far fronte alle nostre richieste e 
ci segnala un errore. 
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Vediamo con degli esempi il primo modo di 
creare un nuovo tipo di dato: 

TYPE numero—lotto = 1..90; 
lettera—minuscola = ‘a’./z’; 

Questo dei due esempi è il modo in cui di¬ 
chiarare un nuovo tipo di dato ( in questo 
caso con nome “numero—lotto" e "lette¬ 
ra-minuscola") a partire da uno di quelli 
già noti (INTEGER e CHAR). Il tipo di dato 
creato in questo modo è detto intervallo e 
può essere definito a partire da tutti i tipi di 
dati ordinali, tipi cioè per i quali noi possia¬ 
mo trovare, per ogni valore tranne even¬ 
tualmente il primo e l’ultimo, il valore prece¬ 
dente e seguente di quello dato: in questo 
modo si viene ad unire sotto il nome di tipi 
ordinali tutti i tipi che consistono di un nu¬ 
mero finito di elementi e per i quali è stabili¬ 
to un ordinamento di qualche genere. 
Abbiamo incontrato tipi di dati ordinali e 
precisamente il tipo INTEGER ed il tipo 
CHAR per i quali valgono le proprietà anzi- 
dette. 

Le definizioni date negli esempi possono 
essere ‘lette’ come segue: nel primo caso di¬ 
ciamo che sono dati di tipo “numero—lot¬ 
to" tutti i valori INTEGER che vanno ordina¬ 
tamente dal numero 1 al numero 90; nel se¬ 
condo esempio che tutti i caratteri, o meglio 
i valori, tra ‘a’ e z’, seguendo l’ordinamento 
alfabetico, sono da considerare del tipo 
“lettera—minuscola”. 

Analogamente potevamo definire il se¬ 
guente tipo 

TYPE maiuscola = ‘A’./Z'; 

ugualmente valido: ricordiamo che i carat¬ 
teri che rappresentano le lettere minuscole 
e maiuscole sono considerati diversi ed or¬ 
dinati separatamente tra loro nel senso che 
dopo la ‘a’ viene la ‘b’ e non la ‘A’ oppure la 
B’ e viceversa. 

Dopo queste dichiarazioni siamo liberi di 
dichiarare variabili che accolgano dati di 
questi nuovi tipi come 

VAR estrazione : numero—lotto; 

e possiamo manipolare questi dati con le 
stesse operazioni valide per i tipi primitivi da 
cui hanno preso origine. 

La seconda modalità in base alla quale 
possiamo creare un nuovo tipo di dati è in¬ 
vece completamente svincolata da quelli 
che sono i tipi già esistenti nel linguaggio. 
È tuttavia molto semplice creare uno di 


questi nuovi tipi: 

l’unica limitazione che ci viene imposta è 
che esistano un numero finito di valori vali¬ 
di per questo tipo. 

La dichiarazione di questi tipi avviene nel 
seguente modo 

TYPE nome—tipo = (elenco—di—valori); 

in cui le parentesi tonde sono necessarie e 
racchiudono un elenco con degli identifica¬ 
tori separati tra loro da virgole. 

A titolo d’esempio possiamo definire un tipo 
“pezzo—degli—scacchi" semplicemente 
scrivendo 

TYPE pezzo—degli—scacchi = (pedone, 
alfiere, cavallo, torre, 
regina, re); 

e dichiarare poi due variabili di questo tipo 

VAR pezzo—bianco, pezzo—nero : pez¬ 
zo—degli—scacchi; 

alle quali poi assegnare uno dei valori elen¬ 
cati nella dichiarazione con una semplice 
assegnazione 

pezzo—bianco := cavallo; 

Il tipo che si viene a creare è un tipo ordina¬ 
le in quanto il numero dei valori possibili è 
limitato ed è definito per esso un ordina¬ 
mento che nella fattispecie è l’ordine in cui 
sono elencati i valori. 

Essendo un tipo ordinale possiamo anche 
definire su questo tipo un altro tipo di dati 
come intervallo di questo. 

Facciamo un esempio per chiarire il con¬ 
cetto 

TYPE mesi = ( Gennaio, Febbraio, Marzo, 
Aprile, Maggio, Giugno, 

Luglio, Agosto, Settembre, Ottobre, Novem¬ 
bre, Dicembre); 

mesi—di—estate = Giugno..Settembre; 

In questo esempio abbiamo prima dichiara¬ 
to un tipo “mese" e poi, partendo da que¬ 
sto, abbiamo definito un nuovo tipo “me¬ 
si—di—estate” che è un sottoinsieme del¬ 
l’insieme dei mesi di un anno. 

Tutto ciò mostra l'estrema flessibilità del lin¬ 
guaggio e la sua adattabilità ai contesti più 
disparati che si possano venire a creare 
nell’ambito della programmazione. 

Per i tipi di dati creati in questo modo il Pa¬ 
scal ci fornisce un insieme di operatori, o 
meglio di funzioni, che sfruttano la proprie¬ 


tà dell’ordinamento dei dati. 

Queste funzioni sono: 

succ(...) che restituisce il successore di un 
elemento; 

pred(...) che compie l'operazione inversa 
restituendo il predecessore dell’elemento; 
ord(...) che ritorna un valore numerico IN- 
TEGER il quale indica la posizione dell’ele¬ 
mento nell’ elenco dei valori (0 per il primo, 
1 per il secondo e cosi via). 

Questi operatori sono gli stessi che si ado¬ 
perano per il tipo CHAR e valgono anche 
per tutti gli altri tipi di valori ordinali. 
Bisogna sempre fare attenzione comunque 
a non cercare di ricavare né il predecessore 
del primo elemento né il successore dell’ul¬ 
timo perché questo genera un errore da 
parte deH’implementazione del linguaggio. 


IE STRUTTURE DI DATI 

Fino ad adesso abbiamo preso in conside¬ 
razione i dati da un punto di vista molto 
semplice ed in generale le variabili che noi 
possiamo utilizzare con le attuali cognizioni 
ci consentono di memorizzare dei valori so¬ 
lo in maniera rigida: una variabile accoglie 
un dato di un solo tipo. 

Il Pascal è però un linguaggio che ha forse 
uno dei suoi punti di forza proprio nella ma¬ 
nipolazione dei dati ed esiste quindi la ma¬ 
niera di andare oltre le possibilità fin qui no¬ 
te che sarebbero per molti versi limitative 
nell’ambito di realizzazioni concrete in cui 
si ha a che fare, per esempio, con tipi di da¬ 
to tra loro diversi ma legati in un qualsiasi 
modo oppure a tabelle di valori. 

Questo viene realizzato mediante l’utilizzo 
di strutture di dati oppure di dati composti 
che non sono altro in pratica che insiemi di 
dati, primitivi o creati da noi, a cui viene da¬ 
ta una organizzazione che faciliti l’associa¬ 
zione dei dati astratti su cui lavora la mac¬ 
china con la realtà concreta dell’applica¬ 
zione che si sviluppa. 

In Pascal esistono strutture di dati predefi¬ 
nite come l’ARRAY ed il RECORD ed alcune 
altre ed è inoltre possibile, e qui entrano in 
gioco i puntatori, definirne delle altre com¬ 
pletamente diverse a seconda delle esigen¬ 
ze del programmatore. 

Il prossimo mese, nel quale si concluderà 
questo breve corso, conosceremo l’ARRAY 
ed il RECORD, amplieremo il discorso per 
quel che riguarda le strutture di controllo 
del flusso e vedremo brevemente come si 
realizza l’input di dati in Pascal. 
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Scanner per 
Commodore Amiga 


di GIANNI AGAMENNONE 


La trasposizione di una immagine da un 
supporto cartaceo, ad esempio una foto¬ 
grafia, in un computer è possibile utiliz¬ 
zando una telecamera con relativa inter¬ 
faccia e software. Oggi, con rutili zzo di 
un nuovo sensore allo stato solido (CCD), 
è possibile utilizzare scanner della gran¬ 
dezza di un mouse di facile uso. Questa 
nuova periferica è impiegata anche al ri¬ 
conoscimento dei caratteri di testo (OCR) 


HANDY SCANNER 3.0 GmbH 


a confezione proposta dalla 
CAMERON è composta da un 
Handy Scanner (simile alla 
versione per PC IBM e com¬ 
patibili), interfaccia da con¬ 
nettere al BUS-PORT deH’Amiga, manuale e 
software su dischetto da 31/2 pollici, inoltre 
viene fornito un manuale (HANDY REA- 
DER) con relativo software per l’utilizzo del 
predetto scanner nelle applicazioni Optical 
Character Recognition od OCR mensiona- 
to nel sommario 


INSTALLAZIONE 
HARDWARE E SOFTWARE 

A computer spento connettete aH’Handy 
Scanner Interface il cavo con terminazione 
DB9 (visibile in fig. 4 in basso a sinistra) e 
con un giravite serrate le due viti poste nella 
conchiglia; poi togliete lo sportellino in pla¬ 
stica che copre il connettore della porta di 
espansione dell’Amiga (BUS-PORT). Potete 
ora osservare il pettine a 44 + 44 .contatti 
(pin) e comprenderete con un poco di fan¬ 
tasia come inserire l’interfaccia al V/s com¬ 
puter! 

Se all’accensione, l’Amiga segnala proble¬ 
mi, spegnete l’alimentazione e riflettete con 
calma sulle operazioni da controllare e rifa¬ 
re...senza panico. 

Se tutto è OK vi invitiamo ad effettuare il 
BACKUP con dei dischi originali che non 
presentano alcuna protezione software, 
badando a non inquinarli con i virus che si 
annidano in quelle “copiacce” di dischi 
che tutti possediamo. 

Le operazioni da effettuare sono le seguen¬ 
ti: 

1) Inserite il vostro disco di sistema (senza il 
virus!) in DFO ed un disco vergine in DF1 
(quelli che hanno un solo disco non merita¬ 
no la mia attenzione!) e da CU eseguire: 

SYSTEM/DISKCOPY DFO: TO DF1: [RE¬ 
TURN] 

RELABEL DF1: WB [RETURN] 

per controllo usate INFO e se non siete 
esperti del DOS, siete invitati a studiare i co¬ 
mandi che si possono impartire da OLI altri¬ 
menti il vostro computer vi serve soltanto 
per giocare.. Vi è piaciuta la punzecchiati- 
na? 


2) ora levate il disco WorkBench e ponete in 
DFO il disco appena copiato dandogli in 
nome WB, eseguite il boot e da OLI esegui¬ 
te: 

SYSTEM/DISKCOPY DFO: TO DF1: [RE¬ 
TURN] 

al messaggio del dos levate il disco che 
avete etichettato con WB ed inserite,sempre 
in DFO, il disco originale (Handy Scanner 
3.0) protetto e nel DF1 un nuovo disco ver¬ 
gine; ora premete RETURN ed 
a backup effettuato, toglete da DF1 il disco 
ed etichettatelo con "Handy Scanner 3.0 
COPIA”. 

In DFO c’è ancora il disco WB e pertanto ef¬ 
fettuate il backup anche del disco Handy 
Reader con lo stesso procedimento su indi¬ 
cato. 

3) con il disco WB che è rimasto in DFO, 
mettete in DF1 il disco: Handy Scanner 2.0 
COPIA, eseguite il boot e da OLI il coman¬ 
do: 

EXECUTE PAINTER:ENGLISH [RETURN] 

ciò produrrà nel disco WB dei files necessa¬ 
ri alla gestione dello scanner con messag- 
gistica in lingua inglese (è possibile ciò in 
francese od in tedesco, non è prevista la 
versione in italiano). 

Se volete controllare ciò che questa opera¬ 
zione effettua nel disco Wb, dovrete stam¬ 
pare la sua directory estesa con il coman- 
do:DIR TO PRT: OPT A [RETURN] e riflettere 
sui files creati nel disco stesso. 

Ora sulla etichetta del disco WB aggiunge¬ 
te: 

“DISCO DI LAVORO HANDY SCANNER 
3.0” 
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4) con il disco di lavoro finalmente prodotto 
(riponete la copia dell’originale nella confe¬ 
zione insieme a quello dato dalla Cameron) 
digitate: 

DEMO [RETURN] 

il programma DEMO permette di familiariz¬ 
zare con lo scanner e provare la regolazio¬ 
ne del contrasto. 

Questa regolazione produrrà sullo scher¬ 
mo gli effetti della correzione: vicino alla 
manopolina relativo al contrasto è disponi¬ 
bile un switch a quattro posizioni. Quest’ul¬ 
timo stabilisce il “MODE SCAN", cioè sele¬ 
ziona quattro livelli differenti di grigio con 
cui può essere ripresa un’immagine che in¬ 
tendete riprendere con lo scanner. Inoltre 
dovrete tener conto che a piena risoluzione 
un'immagine verrà riprodotta con 16 toni di 
grigio per pixel, ogni posizione del selettore 
attiva un modo differente di riproduzione 
dell'Immagine ed infine, lo scanner lavora 
in monocromatico emulando i colori con 
toni di grigio. 

Nota bene che il comando DEMO va digita¬ 
to nell’ambiente di lavoro CU, altrimenti bi¬ 
sognerà clickare con il mouse la sua icona 
se effettuate un boot od iniziate con l’ac¬ 


censione del computer (anche in questo ul¬ 
timo caso è possibile andare in CLI con il 
solito CTRL + D e dare comandi diretti al 
dos). 

Pertanto organizzatevi a gestire con ordine 
la V/s scrivania e prendete ciò che Vi inte¬ 
ressa digitalizzare: foto, giornali, disegni, 
non siate ingordi ed iniziate con poche im¬ 
magini perchè ora dovrete apprendere co¬ 
me utilizzare al meglio l’Handy Scanner. 
L’esecuzione del programma DEMO non vi¬ 
sualizza i soliti menu, non spaventatevi e 
cominciate a premere il pulsante posto sul¬ 
lo scanner e muovetelo nella direzione pre¬ 
ferita; sperimentate varie velocità di scan¬ 
sione e riflettete sui risultati che osservate 
sullo schermo del monitor, poi provate a 
“smanettare” le regolazioni, ripetete le ope¬ 
razioni precedenti e riflettete ancora, i risul¬ 
tati sono simili alle tecniche fotografiche 
e/o fotocopiatrici. 

Ogni volta che lascerete il pulsante dello 
scanner noterete che sullo schermo non 
viene riprodotta nessuna immagine e la lu¬ 
ce di colore rosso attiva sta ad indicare che 
lo scanner è ancora pronto per una scan¬ 
sione successiva. La finestra di traguardo, 
posta vicino al pulsante di “START SCAN¬ 
NING”, Vi permette di osservare l’inizio della 


immagine che intendete utilizzare e di tener 
conto che non potete riprendere immagini 
più larghe di 64 mm. Se avrete fatto abba¬ 
stanza esperienza ed avete capito tutto o 
quasi, premete il tasto ESC per uscire dal 
programma DEMO o con il mouse clickate 
sull’opzione di uscita fornita dalla “barra 
menu”. 

N.B. seguire le operazioni da compiere nel 
modo che vi ho indicato servirà a compren¬ 
dere il manuale allegato allo scanner che, 
anche se esaustivo nelle informazioni, è 
scritto in un inglese imperfetto e non chiaro 
dal punto di vista delle operazioni da com¬ 
piere, provare per credere! 

5) Come per DEMO, sia che siete in ambien¬ 
te CLI o WB, utilizzate il programma PAIN- 
TER. 

Da CLI il programma accetta vari parametri 
che qualificano vari modi di funzionamen¬ 
to: 

PAINTER 1 [RETURN] per riprese di imma¬ 
gini B/N (bianco/nero) cioè al tratto come 
quelle dei giornali. 

PAINTER 2 [RETURN] le immagini a colori 
sono riprodotte con 4 tonalità di grigio. 


LIST 6/89 


49 





AMIGA CORNER 


PAINTER 3 RETURN le tonalità di grigio 
^possibili sono 8. 

PAINTER 4 RETURN le tonalità di grigio 
possibili sono 16. 

PAINTER x J [RETURN] viene attivato il mo¬ 
do alta risoluzione, x parametro dal a 4 ed 
j (Ja in tedesco) 

N.B. se digitate:PAINTER [RETURN] senza 
alcun parametro, il programma lavorerà 
solo in B/N usando la risoluzione più bassa. 

A caricamento effettuato, PAINTER visua¬ 
lizza un ricco menu di scelta comprensibile 
da tutti gli appassionati di grafica; pertanto 
parleremo soltanto delle funzioni disponibi¬ 
li più inusuali. Le funzioni disponibili sono 
sotto forma di icona sono sempre visibili e 
poi c’è la “barra menu” che aH’interno di 
ciascuna voce possiamo selezionare molte 
funzioni ai più note. 

- Nella funzione TEXT c’è l’opzione DO mo¬ 
strate con il segno “ + ” mentre “UNDO” 
(cioè DO = fai ed UNDO = disfai od annul- 
la)con ,, - M ; 

così pure, ad esempio,: Bold + e Bold- 
esprime il voler attuare rispettivamente il 
modo di scrittura in bold e di sopprimerlo. 

- La funzione di PRINT permette la stampa 
della immagine corrente sul video e le op¬ 
zioni seguenti indicano al programma qua¬ 
le tipo di stampante intendete usare. 

E = Epson o compatibile. 

P = necP6 Pinwriter o compatibile. 

H = HP Laserject o compatibile 
A = standard printer driver Amiga se non 
avete nessuna delle stampanti mensionate 
prima. 

inoltre nel print menu troverete V = vertical 
H = horizontal e potrete anche determina¬ 
re il rapporto di stampa, ad esempio un pro- 
portion di 1:1 produce stampe di cerchi nel¬ 
la forma reale e non di forma ellissoidale. 
Potete osservare lo schermo video in alto 
nella pagina, dopo aver effettuato la scan¬ 
sione di una mia fotografia; cosi tutti posso¬ 
no giudicare le notevoli caratteristiche dello 
scanner che ho preso in esame. 

- SCANNING questo comando vi permette 
di “catturare un’immagine con Handy 



Scanner, di elaborarla, salvarla, stamparla, 
dopo aver riempito il "PICTURE BUFFER” 
(zona di memoria riservata a contenere 
l’immagine video di cui una parte è visualiz¬ 
zata sullo schermo) di Handy Painter. Le di¬ 
mensioni di questo buffer dipendono dai 
parametri definiti dalla funzione "DIMEN- 
SIONS” del menu. Spesso Vi capiterà di 
mettere parte di ciò che avete "catturato” 
in altri immagini o testi precedentemente a 
fatica realizzati. Ciò è possibile utilizzando 
la funzioni di copy, zoom, altrimenti è possi¬ 
bile scegliere un particolare buffer (da 1 a 
6) con cui lavorare e precedentemente defi¬ 
nito nelle dimensioni (DIMENSIONS), pas¬ 
sare da quello corrente ad un altro portan¬ 
do parti del primo per copiare dove volete, 
sta alla vostra fantasia e creatività utilizzare 
al meglio tutte queste possibilità. 

- BEND è possibile distoreere le immagini 
per produrre suggestivi anamorfismi, natu¬ 
ralmente dovrete possedere od acquisire 
una “certa dote artistica” per sfruttarla. 

- SCREEN DUMP ha il significato di salvare 
soltanto ciò che è visualizzato sullo scher¬ 
mo e non tutto il “picture buffer”, altrimenti 
utilizzate il comando seguente. 

- SAVING salva tutta l’immagine in IFF for¬ 
mato per essere utilizzata da altri program¬ 
mi. 

- DISPLAY COMPRESSION questo coman¬ 
do visualizza le immagini precedentemente 
salvate in modo compresso ottimizzando lo 
spazio di memoria sul vostro dischetto e be¬ 
neficiando una maggiore velocità di lettura; 
infatti questo comando riconosce automa¬ 
ticamente le caratteristiche di un file com¬ 
presso! 

Handy Painter 3.0 lavora con “memoria vir¬ 
tuale” per visualizzare le immagini sullo 
schermo, infatti se disegnate un grande 
cerchio vedrete che questo si completerà 


nella parte non visibile dello schermo cor¬ 
rente (cioè attualmente visibile). 

Infine c’è una precauzione da prendere nel¬ 
l'uso di Handy Scanner: non sporcare i rulli 
guida dello scanner per garantire la giusta 
trasmissione dei movimenti dell’apparato 
stesso; evitare di usare panni imbevuti di al¬ 
cool, petrolio o sostanze corrosive per puli¬ 
re i rulli di gomma. Evitare cambi repentivi di 
temperatura, tassi elevati di umidità ed inol¬ 
tre la polvere! 


Il SOFTWARE PER II 
RICONOSCIMENTO TESTI OCR 

Nella confezione, con indicazione HANDY 
READER, è presente un disco con il sof¬ 
tware per il riconoscimento caratteri di te¬ 
sto ed un manuale di utente abbastanza 
ben documentato. 

Naturalmente questo programma permet¬ 
te di riprenedere e riconoscere testi che 
siano facilmente leggibili dallo scanner e 
quest’ultimo deve essere mosso in modo 
uniforme e nella stessa direzione delle 
scritte; siccome l’immagine appena ripresa 
è visibile sullo schermo del vostro monitor, 
è possibile avere la sensazione di ciò che 
si sta compiendo e comportarsi di conse¬ 
guenza. 

Posso consigliarvi, per facilitare tale com¬ 
pito, di utilizzare un righello a mo di guida 
per effettuare scansioni di testo lineari, 
cioè senza percorsi tortuosi. 

Il software OCR prevede l’apprendimento 
dei caratteri che non può riconoscere e 
considerando le limitazioni della finestra di 
scansione (solo scanner FLAT-BED o da 
tavolo possono ovviare a tale limitazione), 
sono necessarie varie sessioni di scansio¬ 
ne per acquisire un’intera pagina di testo. 
Ricordatevi che software OCR, dedicati 
agli scanner professionali, costano diversi 
milioni, pertanto Handy Reader è vera¬ 
mente un prodotto poco costoso ed inte¬ 
ressante per chi vuole apprendere questa 
nuova tecnica di acquisizione di testi. Con 
la descrizione di quest’ultima applicazio¬ 
ne, colgo l’occasione per salutarvi e spero 
di aver contribuito a diffondere la cono¬ 
scenza di una periferica molto interessan¬ 
te, ma ancora poco diffusa tra tutti gli 
utenti di AMIGA 500 o 2000 della Commo¬ 
dore. 

Ringrazio vivamente il signor Pelosi Franco, 
della PIX COMPUTER S.r.L., di Via France¬ 
sco D’Ovidio 6c in Roma, per aver concesso 
Handy Scanner 3.0 per le prove. 
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di GIAN PIERO ROSI e GIANNI AGAMENNONE 


SOFTWARE COMMODORE NEWS 


SIDEWAYS 


Programma 

Computer 

Autore 

Distributore 


Sideways 

Commodore 64/128 
Funk Software 
C.T.O. 


Questo programma per Commodore 64 e 
128 effettua una rotazione di 90 gradi del¬ 
l'output della vostra stampante , permet¬ 
tendo quindi la stampa di tabulati lun¬ 
ghissimi 

Crediamo che questo programma farà felici 
tutti i possessori di Commodore 64 e 128. 
che si cimentano spesso nell’uso di “fogli 
elettronici” (spreadsheet, all’inglese). 

Uno spreadsheet non è altro che la versio¬ 
ne “automatizzata” di un classico set di la¬ 
voro: un foglio di carta quadrettata, una 
matita, una gomma ed una calcolatrice. 

Il foglio elettronico è in grado di effettuare 
automaticamente operazioni matematiche 
sugli elementi numerici presenti nelle righe 
e nelle colonne del reticolo, in base alle for¬ 
mule definite dall’utente. 

Le tabelle cosi ottenute (si potrebbe trattare 
ad esempio di elaborazioni statistiche, op¬ 
pure di bilanci finanziari) vanno in genere 
successivamente stampate per ottenere i 
“famigerati" tabulati, ovvero papiri spesso 
notevolmente lunghi e complessi. 

Il più delle volte queste tabelle hanno una 
larghezza maggiore di quella di un foglio 
della stampante, costringendo l’utente a 
suddividere la stampa in vari spezzoni da 
tagliare per poi ricongiungerli nella giusta 
posizione. 

SIDEWAYS non è un foglio elettronico, ma 
elabora i tabulati generati dai più diffusi 
spreadsheet presenti sul mercato, stam¬ 
pandoli ruotati di 90 gradi. 

Ciò significa che la tabella verrà stampata 
in senso verticale, anziché in orizzontale: 
praticamente con le righe al posto delle co¬ 
lonne. 



Personal Computer Soitware 


SIDEWAYS 

Prinls your spreadsheet sideways. 
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US wth mosl spreadsheet progran 


È evidente il vantaggio che si può trarre da 
questa nuova possibilità, considerando 
che SIDEWAYS è in grado di stampare su 
carta qualsiasi file di testo in formato ASCII, 
teoricamente qualunque sia la sua larghez¬ 
za (si possono superare le 65000 colonne di 
caratteri!). 

La configurazione necessaria per utilizzare 
il SIDEWAYS consiste in un computer Com¬ 
modore 64 o 128, un floppy disk drive ed 
una stampante grafica a matrice di punti. 
Se non si possiede una stampante Commo¬ 
dore, è necessario dotare il computer an¬ 
che di un'interfaccia. 

Il pacchetto comprende due dischi, uno 
contenente il software per computer Com¬ 
modore 64, l’altro contenente quello per 
Commodore 128 (in modo video ad 80 co¬ 
lonne). 

Gli spreadsheet compatibili con il Sideways 
sono Better Working Spreadsheet, Creative 
Cale, Practicalc II, Cale Now, Microsoft Mul- 
tiplan, Syncalc, Cal-Kit, Practicalc 64, Trio e 
qualunque altro foglio elettronico in grado 
di creare un file testo ASCII su disco. 


Le stampanti che si possono utilizzare ap¬ 
partengono ad un nutrito elenco, che com¬ 
prende modelli Commodore. Epson, Okida- 
ta, Mannesmann, Texas Instruments, Hew¬ 
lett Packard, Gemini, NEC. 

Sarà quindi molto difficile non riuscire a tro¬ 
vare fra queste il modello di vostro interes¬ 
se! 


INSTALLAZIONE 

Come ogni pacchetto software che si ri¬ 
spetti, l’installazione viene effettuata lan¬ 
ciando un programma apposito che per¬ 
mette di memorizzare su disco le predispo¬ 
sizioni desiderate. 

Non sarà quindi necessario ripetere le ope¬ 
razioni di settaggio ogni volta che userete il 
SIDEWAYS, dal momento che i parametri ri¬ 
siederanno permanentemente su disco (al¬ 
meno fino a quando non decidiate di modi¬ 
ficarli). 

Per procedere con l’installazione bisogna, 
prima di tutto, rimuovere dal disco la prote¬ 
zione adesiva contro la scrittura. 

Digitate poi il comando LOAD"SWIN- 
STALL”,8,1 (se possedete un C64) oppure 
DLOAD“SWINSTALL” seguito dal comando 
RUN (se possedete un CI28). 

Apparirà sullo schermo il menu del pro¬ 
gramma di installazione, che vi offrirà la pos¬ 
sibilità di selezionare la stampante desi¬ 
derata. 

Se la vostra stampante non è tra quelle pre¬ 
viste dal programma di installazione non di¬ 
sperate: potete consultare il manuale della 
stampante e settaria in modo tale che emuli 
uno dei modelli contemplati dal SIDEWAYS. 
A questo punto potete procedere con il test 
di stampa e, se l’esito sarà positivo, potete 
terminare l’installazione apponendo di nuo¬ 
vo sul disco le etichette adesive per pro¬ 
teggerlo dalla scrittura. 

È possibile effettuare un ulteriore test, cari¬ 
cando finalmente in memoria il programma 
SIDEWAYS vero e proprio. Sul disco è pre¬ 
sente un file dimostrativo (SAMPLE.PRF), 
che può essere immediatamente stampato 
per verificare se tutto funziona corretta- 
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mente e per saggiare le potenzialità di que¬ 
sto software. 

Sono previste numerose opzioni, per perso¬ 
nalizzare le stampe dei propri tabulati. 

I parametri che selezionerete potranno es¬ 
sere anch’essi memorizzati su disco, in mo¬ 
do da poter essere riutilizzati in seguito. 

Le opzioni disponibili riguardano la stampa 
con doppia passata, il tipo di “font" da 
usare, la spaziatura tra due caratteri, il va¬ 
lore dell’interlinea ed il numero della pagina 
da cui dovrà avere inizio la stampa. 
Utilizzare SIDEWAYS significa far lavorare 
in “simbiosi" due software distinti (lo 
spreadsheet più il SIDEWAYS stesso). Per 
questo il manuale contiene, per ognuno dei 
fogli elettronici compatibili con il SIDE¬ 
WAYS, le istruzioni dettagliate e appropria¬ 
te all’uso combinato dei due software. 

Un programma come il SIDEWAYS non è 
certamente qualcosa di superfluo, ma si af¬ 
ferma prepotentemente come ausilio indi¬ 
spensabile per chi svolge determinati lavori. 

VIDEOSCAPE 3D 

Programma : Videoscape 3D 

Computer : Amiga 

500/1000/2000 
Autore : Alien Hastings 

Distributore C.T.O. 


Altli 

/kteoScape 3D 


A solid 3-D animation and rendering System 



For thè Commodore Amiga “ Family of Computers 


Se volete trasformare il vostro monitor in 
una telecamera capace di filmare il mondo 
in tre dimensioni, allora questo è il pro¬ 
gramma adatto alla vostra fantasia. Questo 
prodotto della AEGIS permette di montare 
animazioni facendo compiere agli oggetti 
qualunche traslazione e rotazione lungo i 
tre assi cartesiani X, Y e Z. Tutto ciò’ viene 
realizzato in cinque passaggi di lavoro: 



Sequenza di immagini animate ottenuta combi¬ 
nando creazioni Videoscape 3D con primi piani 
e sfondi in IFF 



; Load Hotion jj 

Knanual -control) i; 

Ground color: 

|| Cfunse Zoon l| 

|S Iweens : 

8 Pranes : 

ji Load Bjnd 

Pause after 
eacli frane? 

| Yes 

Load Fsnd ■ 


Black 




La schermata centrale del Videoscape 3D per¬ 
mette la manipolazione di oggetti e filmati e 
l'inserimento di immagini animate 


creazione degli oggetti, descrizione delle 
varie posizioni che devono assumere i sin¬ 
goli oggetti in animazione, definizione del 
movimento dell’ipotetica telecamera che 
vedrà la scena nel suo complesso, l'impo¬ 
stazione del numero di fotogrammi al se¬ 
condo che formerà la sequenza da visualiz¬ 
zare, calcolo delle prospettive e delle om¬ 
breggiature ed infine, la registrazione del fi¬ 
le in formato ANIM che può’ durare molto 
tempo. Il manuale è molto ben documenta¬ 
to e pertanto consideratelo come ottima 
guida per i vostri lavori da regista! 


LIGHTS! CAMERA! ACTION! 

Programma : Lights! Camera! 
Action! 

Computer : Amiga 

500/1000/2000 

Autore : Sparta Ine. 

Distributore : CTO 



Questo prodotto della AEGIS permette di 
creare presentazioni di vario genere in mo¬ 
do molto spettacolare. Il programma fa uso 
di schermate già esisestenti come le figure 
salvate in formato IFF, animazioni registra¬ 
te in formato ANIM e così pure dei files mu¬ 
sicali registrati dal famoso programma SO- 
NIX. Inoltre permette di sincronizzare l’inizio 
e la fine di ogni brano musicale e permette 
di variare il ritmo, la tonalità ed altri para¬ 
metri così da consentire un approccio per¬ 
sonalizzato con le immmagini che si susse¬ 
guono sul video. Nella sessione di composi¬ 
zione sono disponibili le modifiche ai movi¬ 
menti di tipo zig-zag, traslazioni, rotazione, 
movimento spiraliforme e vari dipi di dissol¬ 
venza. Una parte del programma prevede 
anche la gestione di alcuni GENLOCK 
commerciali e sono disponibili alcune pre¬ 
sentazioni demo che fanno apprezzare 
questo prodotto. Vi consiglio di adoperare 
questo programma se siete creativi e pieni 
di fantasia! 
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AMIGA CORNER 


ATREDES 

LA TERZA SCELTA! 


Vi presentiamo l’Atredes, il nuovo pac¬ 
chetto di gestione BBS commercializzato 
per Amiga 


ra tutte le categorie che com¬ 
pongono il parco software di 
Amiga, una delle più nutrite è 
quella che raccoglie i pro¬ 
grammi dedicati alle gestio¬ 
ne di Bulletin Board Systems - o BBS. I pac¬ 
kage disponibili fino ad oggi erano quasi 
tutti di Pubblico Dominio, in versione com¬ 
merciale erano presenti solo il BBS-PC, or¬ 
mai arrivato alla versione 4.20, ed il Cu- 
stom-BBS. 

In questo panorama si inserisce oggi un 
nuovo prodotto, frutto degli sforzi di Mi¬ 
chael Cox della A.R.R. Soft, questo nuovo 
pacchetto si chiama “Atredes BBS". 


CARATTERISTICHE PRINCIPALI 

Una volta aperta la confezione, ci si trova di 
fronte a due dischetti ed a un manuale di 
circa 50 pagine. Il secondo dischetto serve 
per pilotare la grafica, interessante vero? 
Le capacità offerte dal pacchetto sono va¬ 
rie, ma tra queste la sola che lo rende unico 
è il supporto del nuovo tipo di “emulazio¬ 
ne”: la grafica SKYPIX. 

Quest’ultima, grazie appunto al program¬ 
ma presente sul secondo disco, consente la 
creazione di schermate di rara bellezza 
(320 per 200 punti con 16 colori) visualizza¬ 
te ad una velocità incredibile, con l’uso di 
molteplici fonti. Per il resto, oltre alla mes- 
saggistica ed alle librerie di Up/Download, 
una delle possibilità fuori dal comune è 
quella di poter richiamare dei moduli ester¬ 
ni alla BBS: tutte le istruzioni per la proget¬ 
tazione dei programmi complementari è in¬ 
clusa sul dischetto, e con una conoscenza, 
anche solo basilare, del C non dovrebbe 
essere molto difficile personalizzare il pro¬ 
prio Bulletin Board. 


INSTALLAZIONE 

Grazie soprattutto alle utility “Configure" e 
“Sysop”, presenti sul primo disco, l'installa¬ 
zione di Atredes è molto semplice: basta 
creare tante directory quante sono le aree 
file, ed editare il file "Defaults” tramite 
“Configure”. 

È importante ricordarsi di inserire l’istruzio¬ 
ne HO nella stringa di inizializzazione del 
modem, in quanto il programma non prov¬ 
vede a riagganciare la linea da solo. 
Volendo modificare anche i menu e gli help, 
basterà procurarsi un buon Text Editor in 
grado di gestire l’ANSI (Consigliamo il TxEd 
della MicroSmiths). 

MES SAGGISTICA 

È proprio quest'ultima il "Pezzo forte” di 
Atredes: le opzioni sono veramente tante, e 
tutte molto potenti. 

La BBS può contenere infinite aree mes¬ 
saggi, anche se un singolo utente può ac¬ 
cedere solo a 20 alla volta (limite che ci 
sembra più che sufficiente); sono previste 
sezioni a sola lettura, a sola scrittura oppu¬ 
re di massima sicurezza, che richiedono 
una PassWord speciale per l’entrata. 

Dopo aver selezionato il comando M dal 
menu principale ci si ritrova nella sezione 
messaggi: da qui possiamo scegliere tra 
ben 12 opzioni, delle cui la più potente ed 
importante è la lettura, associata al tasto S. 
Dopo averla scelta, il sistema ci presenta il 
primo nuovo messaggio, seguito da un pic¬ 
colo menu che varia a seconda della situa¬ 
zione: qui possiamo scegliere se vogliamo 
rispondere, leggere in ordine cronologico o 
logico (seguendo cioè le risposte successi¬ 
ve), rileggere il testo, cancellarlo (solo se è 
da o per noi) o uscire dalla lettura. 

Le opzioni sono molteplici, e consentono di 
seguire una serie di messaggi senza perde¬ 
re il filo della discussione, come invece ac¬ 
cade spesso con altri Software. 

Anche l’Editor, a dispetto della sua appa¬ 
renza spartana, è molto efficiente: tutti i co¬ 
mandi sono rapidi, e sono possibili sostitu¬ 
zioni lungo tutto il testo. 


SEZIONE FILE 

Nonostante siano supportati solo tre proto¬ 
colli (Xmodem, Xmodem 1K e YModem), i 
comandi a nostra disposizione sono molti, 
addirittura 18. 

La funzione di Find è una tra le migliori mai 
viste, ed è l’unica su Amiga a supportare la 
wildcards Unix-Like, dove un asterisco rap¬ 
presenta un gruppo di caratteri di qualsiasi 
tipo ed un punto interrogativo un solo ca¬ 
rattere. È da notare la possibilità di poter ri¬ 
chiedere le liste dei file sia in versione ridot¬ 
ta che non, e di poter esaminare i contenuti 
dei file *.ARC. Un’altro comando interes¬ 
sante è il DG, che permette di fare un Down¬ 
load automatico. Infatti, dopo che il trasferi¬ 
mento del file sarà completato, Atredes 
chiuderà la linea, permettendoci così di de¬ 
dicarci ad altre attività senza aver paura di 
rimanere On-Line, con conseguente spesa 
astronomica. 

Ci sono però due pecche in questa parte 
del programma: la prima è la brevità del 
campo a nostra disposizione per commen¬ 
tare un file: 70 caratteri sono pochini, e ci 
obbligano a dover “scaricare” un docu¬ 
mento separato, e la seconda è il fatto che 
volendo fare un Upload in locale si è co¬ 
stretti a ricorrere all’utility "Sysop”. 


CONSIDERAZIONI FINALI 

Atredes ci ha fatto un’ottima impressione: è 
un software innovativo su Amiga, grazie so¬ 
prattutto all'opzione "Elsewhere”, che ci 
consente di far girare moduli esterni alla 
BBS. La messaggistica è la migliore mai vi¬ 
sta su qualsiasi Bulletin Board, e l’area file, 
benché non supporti molti protocolli, è 
strutturata in maniera ottima. Purtroppo 
abbiamo notato che spesso il programma 
si "Blocca”, e non risponde più ai comandi; 
speriamo che questo problema sia limitato 
alla versione in nostro possesso, o che sia 
dovuto alla nostra configurazione. 
Ringrazio Giordano Mattei e Roberto Prate¬ 
si per la gentile collaborazione. 
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IL MONDO MS DOS 

UN COMANDO 
Al GIORNO... 


L'EDITOR DELL’MS-DOS: EDLIN 



Le due opzioni di riga servono per indicare 
all’edlin l’intervallo di tempo in cui si vuole 
effettuare la sostituzione di “testol” con 
“testo2”. Omettendo tali opzioni di riga 
l’edlin utilizzerà come intervalli i soliti valori 
di default. 

Se per esempio volessimo sostituire la paro¬ 
la “list” con la parola "listbbs” nelle prime 
20 righe di un file, non dovremo far altro che 
indicare: 

1,20rlistCTRL-Zlistbbs 

Inserire il punto interrogativo “?” dopo la 
seconda opzione diriga indicherebbe al- 
l’edlin di porre la domanda “O.K.?” ogni 
qual volta incontri la parola list. In questo 
caso premendo il tasto S(Si) avremmo ac¬ 
cettato la sostituzione. 


Comando “S” Search 


Sintassi: 


[riga] [,riga] [?]stesto 


di ANDREA GIORGI 

Eccovi, finalmente, giunti all'ultima parte 
di questa nostra lunga chiaccherata sul¬ 
l'editore di riga deli'MS-DOS. In questo 
numero chiuderemo l'argomento illustran¬ 
do i pochi e ultimi comandi dell'EdIin an¬ 
cora non trattati. Passeremo poi ad illu¬ 
strare le procedure Batch 


COMANDO “R” REPIACE 


uesto comando consente la 
sostituzione di un testo con 
un altro testo in un punto 
qualunque del file in corso di 
modifica. 

Vediamo la sintassi: 

[riga] [,riga][?]rtesto1 CTRL-Z testo2 


il funzionamento di questo comando è mol¬ 
to simile a quello del comando “R”. 

Le opzioni di riga indicano l’intervallo di ri¬ 
ghe in cui si vuole effettuare la ricerca, "te¬ 
sto” indica il testo che si vuole cercare. 
Omettendo il punto interrogativo l’edlin ter¬ 
minerebbe la ricerca del testo specificato 
alla prima riga in cui è presente tale testo. 
Tale riga diventa così la riga corrente. 
Inserendo tale segno “?” edlin visualizza la 
prima riga con il testo cercato ed il messag¬ 
gio “O.K.?”, ora è in attesa di una nostra ri¬ 
sposta. In caso negativo l’edlin proseguirà 
la ricerca del testo in un’altra riga del file. 
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Comando “T" Transfer 

Tale comando serve per trasferire il conte¬ 
nuto di un file esterno nel file che stiamo 
creando o modificando. 

Sintassi: 

[rigajtnomefile 

per capire tale sintassi facciamo un esem¬ 
pio. 

Se volessimo inserire nel file che stiamo mo¬ 
dificando alla riga 10 il contenuto de file li- 
st.bbs digiteremo il seguente comando: 

10 t list.bbs 


Comando "W” Write 

Questo comando serve per poter scrivere 
su disco un determinato numero di righe 
specificate dall’opzione n. 

Sintassi: 

[n]w 

Tale comando viene usato ogniqualvolta si 
sta operando con file così grandi che ecce¬ 
dono la memoria disponibile. 

Supponiamo di disporre di un file che ecce¬ 
da la memoria disponibile di 100 righe. In 
seguito alla modifica della prima parte del 
file e alla scrittura su disco si può usare il 
seguente comando per poter legger le ri¬ 
manenti righe: 

125w 


Comando “riga” Line Edit 
Sintassi: 

[riga] 

digitando un qualsiasi numero di riga pre¬ 
sente nel file, l’edlin, permetterà la visualiz¬ 
zazione e la conseguente modifica della 
stessa. 

E con questo comando terminiamo la seco- 
da parte del discorso sui comandi di Edline 
concludendo cosi la nostra lunga e, perché 
no, speriamo fruttifera "chiaccherata” sulle 
funzioni di tale comando dell’ms-dos. 

Per il momento potete prendere cinque mi¬ 
nuti di pausa ma non di più perché stiamo 
per rituffarci nel mondo dos con le proce¬ 
dure Batch. 


LE PROCEDURE BATCH 

In questa nostra discussione sui file batch 
cercheremo di illustrarvi al meglio la funzio¬ 
nalità e le caratteristiche peculiari di una 
procedura batch 

Una procedura batch non è altro che una 
sequenza di comandi MS-DOS raggruppati 
tutti in un unico file: il file batch. 

Un file batch quindi permette di eseguire un 
insieme di comandi in sequenza digitando¬ 
ne uno solo. Il comando da digitare è ovvia¬ 
mente il nome del file batch. Tali file sono ri- 
conoscibili tramite l’estensione .BAT. 


COME SI CREANO FILE BATCH 

Un file batch può essere creato usando il 
comando Edlin, l’editor MS-DOS, o usando 
il comando Copy. 

Per quanto riguarda la creazione di un file 
batch attraverso l’utilizzo del comando 
Edlin speriamo non abbiate nessuna diffi¬ 
coltà, e, se le avete, consultate le precedenti 
pagine e numeri di List, qui di seguito, infat¬ 
ti, accenneremo solo ad esempi illustranti 
l’utilizzo del comando Copy. 

Supponiamo ora di voler creare una nostra 
procedura che ci permetta la formattazione 
di un dischetto. La prima cosa da fare è di¬ 
gitare il seguente comando: 

copy con formatta.bat 

Questo comando non fa altro che indicare 
all’MS-DOS di inviare tutte le informazioni 
provenienti dalla consolle (la tastiera in 
questo caso) al file FORMATTA.BAT. 

Le seguenti righe, seguite dalla pressione 
del tasto ritorno, creeranno la nostra pro¬ 
cedura: 

rem procedura di formattazione 
pause Inserire il disco da formattare nel¬ 
l’unità A: 

format a: /v 
chkdsk a: 

dopo aver digitato l’ultima riga premete 
contemporaneamente i tasti CTRL e Z, 
stanti ad indicare la fine del file; a questo 
punto la pressione del tasto Ritorno salverà 
su disco la nostra procedura inviando il 
messaggio "1 file copiato(i). 

A questo punto ogni qual volta desiderere¬ 
mo formattare un dischetto non faremo al¬ 
tro che usare la nostra procedura digitan¬ 


do il nome del file: 
formatta 


Per tutti coloro che non hanno una grande 
dimestichezza con il mondo dos ed in parti¬ 
colare con i file batch, consigliamo di leg¬ 
gere e, se possibile, tenere bene a mente al¬ 
cune regolette fondamentale che ora an¬ 
diamo a eiecare: 

- ogni procedura batch o file batch deve 
avere l’estensione .BAT. 

- ogni qual volta si utilizza un file batch, lo si 
esegue, si deve digitare solo il nome del file 
omettendo l’estensione. 

- se si desidera interrompere l’esecuzione di 
un file batch precedentemente lanciata 
premere contemporaneamente i tasti CTRL 
eC. 

- se, per errore, o volontariamente, si do¬ 
vesse estrarre dal drive un dischetto con¬ 
tenente una procedura batch in fase di 
esecuzione, sarà ms-dos stesso a solleci¬ 
tare il reinserimento onde riprenderne l’e¬ 
secuzione. 

- caratteristica molto importante e utile 
delle procedure batch è quella di poter 
concatenare uno o più file batch semplice- 
mente specificando il nome del file come 
ultimo comando di una procedura. 

- nei file batch possono essere usati sia i 
simboli di direzione ( “<“ e ”>” ) che il sim¬ 
bolo di pipe ( “” ) 

- il cambio o l’impostazione, tramite un co¬ 
mando, di una nuova directory o di un dri¬ 
ve, influisce su tutti i comandi futuri. 

- se si possiede più di un file con lo stesso 
nome ma con l’estensione diversa, l'ms- 
dos ne eseguirà solamente uno in base al 
seguente ordine di precedenza: .COM, 
.EXE, .BAT. 

Per il momento concludiamo questa illu¬ 
strazione delle procedure batch rimandan¬ 
do tutti i nostri affezionati lettori al prossimo 
numero di List dove entreremo più detta¬ 
gliatamente nel discorso delle procedure 
batch esaminando il file batch per eccellen¬ 
za: 

('autoexec.bat. 
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Bill Of MATIRIAIS 


di GIUSEPPE CHERUBINI 

Quanto costa un disegno? 

Elenco dei materiali e dei costi per la sti¬ 
ma veloce dei costi di realizzazione di un 
progetto 



ome ben ricorderete la scor¬ 
sa volta abbiamo spaziato 
su tutti i comandi che nor¬ 
malmente un professionale 
pacchetto CAD contiene, fa¬ 
cendo una panoramica generale, elencan¬ 
do tutti i comandi e sottocomandi ed assu¬ 
mendo come esempio il nostro già cono¬ 
sciuto TurboCAD, il quale molto intelligen¬ 
temente contiene una praticissima guida 
ad un riferimento celere dei comandi. 
Bisogna comunque tenere in debita consi¬ 
derazione che molto spesso ciò che si può 
ottenere dal CAD va oltre i “semplici" co¬ 
mandi a disposizione. 

Fattore determinante è la presenza di un 
computer su cui vengono salvati i dati che 
rappresentano il nostro disegno. 

Da questi dati è possibile estrarre una mi¬ 
riade di informazioni e sottoporre il disegno 
ad una sequela di processi che lo rende¬ 
ranno, nei casi più evoluti, un pezzo finito in 
officina o una parte di un motore diretta- 
mente dal nostro disegno, come nel caso di 
applicazioni CAD/CAM e di robotica, argo¬ 
mento questo che in futuro non è escluso si 
possa diffusamente trattare. 

Comunque, restando nell’ambito del tema 
di questo mese, potremmo dire che una del¬ 
le problematiche che più spesso insistono 
nella progettazione, è la stima veloce dei 
costi di realizzazione dì un progetto, sia in 
termini di tempo che di materiali. 
Immaginiamo una giornata tipica di un di- 


* * * * -> -- -» J ~ * ■» # * x -» ■» x x x x x x x x -»x x •» x ■» x *• x * x x xxx x x x x x x x -> x x -:v x x x x x x x « x x 

x 

* PROGRAMMA PER L'ESTRAZIONE DI UNA DISTINTA BASE 

* * 
Questo uno schema sintetico di come calcolare i costi associati ai mate- * 

* riali contenuti in un disegno di TurboCAD utilizzando dBase. * 

* 11 suo principio di funzionamento è che ciascun elemento ha un costo ed un * 

* nome associati per mezzo di un testo correlato di grandezza zero come parte* 

* dell'elemento. x 

* .•<. 

* Questo programma assume che i dati in dBase siano strutturati come segue: * 

* Campo Nome Campo Tipo Ampiezza Dee x 

* 1 SHAPE_NAME CARATTERE 20 * 

* 2 SHAPE_COST NUMERICO 10 2 * 

* 

* Per utilizzare questo programma dBase, dovrete creare una stringa di testo * 

* di altezza e larghezza zero, che contenga il nome dell'elemento così come * 

* il costo o il valore associato all'elemento. Questo programma utilizza i * 

* primi 20 caratteri per il NOME ed i successivi 10 per il COSTO. « 

- es "Bullone 150.00” x 

* .-i 

* Tenendo a mente il fatto che il testo sarò di altezza e larghezza * 

* zero e quindi non visibile sul disegno, e consigliabile che posizioniate * 

* il testo nel punto di inserimento del 'elemento così che sia rintracciabile * 

4 in un secondo momento. * 

* 

* Dovrete poi trasferire su disco il disegno in formato file di intefaccia * 

* utilizzando il menu a tendina idoneo dopo averlo richiamato con il tasto * 

* funzione <F3>. Il programma dBase che segue leggerà i dati dal file di in- * 

* terfaccia . * 

»##«»*•»»«##*###»* x x x x x x X X X X X X X X X X X x X X X X x X X X X X x X X X X X X x X X X x x X X x x x X x x x x x x x x x x x x x 

* settare l'ambiente in modo che dBase non mandi i risultati a schermo 
SET SAFETY OFF 

SET TALK OFF 

* vuota il database che sarà utilizzato per questo esercizio 
USE TURBOCAD 

ZAP 

CLEAR 

@ 1,22 SAY "Programma esempio di estrazione costi TurboCAD" 

@ 2,22 SAY " == ===—========================================" 

* Chiede che l'utente dichiari il nome del file di intefaccia da usare 
Fi1e_Name = SPACE(8) 

@ 12,20 SAY "Digitare il nome del File Intefaccia :" GET File Name 
READ 

File_Name = TRIM( Fi1e_Name) 

* Legge il file intefaccia di TurboCAD nel database 

@ 24,15 SAY "Caricamento Dati dal File ”+UPPER( File_Name)+".INT - Attendere 

prego.. 

APPEND FROM GFi1e_Name..INT SDF 
SizeX = SPACE(20) 

SizeY = SPACE(20) 

* cancella tutti i record dell'intero database chi 

* testo di grandezza zero 

@ 24,8 SAY "Estrazione costi in corso - Attendere Prego " 

GOTO TOP 

DO WHILE .NOT. E0F() 

* se il record contiene la parola "SIZEX" il 

* dimensione X 
IF "SIZEX"$UPPER( Shape_Name) 

DELETE 
SKIP 

SizeX = Shape_Name 
ENDIF 

> se il record contiene la parola "SIZEY" il prossimo record 

* dimen sione Y 

IF "SIZEY"$UPPER( Shape_Name) 

DELETE 

SKIP 

SizeY = Shape_Name 
ENDIF 

IF SizeX = " 0.0000000000E+00" .AND. SizeY = " 0.0000000000E+00" 

* se il record contiene la parola "TEXT" e gli ultimi X e Y sono entrambi 

* zero, allora il prossimo record seri una stringa di testo che fornirà 

* nome e costo di un elemento 
IF "TEXT"$UPPER( Shape_Namej 

DELETE 

* notare che cancelliamo il record contenente la parola "TEXT" e poi 

* saltiamo 2 record in modo da non cancellare i record con le scritte 
SKIP 2 

ENDIF 

ENDIF 

DELETE 

SKIP 


non siano stringhe di 


prossimo record sarà la 


1 a 
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* 


1 


ENDDO 

* rimozione fisica di tutt 
@24,1 SAY SPACEC 80) 

@ 24,18 SAY "Sorting dei d 
PACK 

* sort del file cosi che t 

* NOTE: 1. Non potevamo es 

mantenere intat 

* poter determina 

* 2. Il file è indie 

* che gli element 

* # separatamente 

INDEX ON Shape_Name + S T R ( 

* Inizia1izzazione Report 

* Se desiderate stampare i 

* SET PRINT ON 
CLEAR 

?" Programma ese 

?" — “« 


i i record marcati per la cancellazione 

ati - Attendere Prego ..." 

utti gli elementi siano insieme 

eguire il sort precedentemente poiché dovevamo 
ta la sequenza logica del file di interfaccia per 
re quali record cancellare 

izzato con Shape_Cost e Shape_Name per assicurare 
i con stesso nome ma costo diverso siano processati 

Shape_Cost, 10,2) T0 TurboCAD 

1 Report, dovrete includere la linea 

mpio di estrazione costi TurboCAD" 


Costo Unit 


Totale' 


Shape_Name 
Shape _C ost 


?"Elemento 
GOTO TOP 

DO WHILE .NOT. E0F( ) 

ShapeCount * 0 
ShapeSt ore 
Cost_Store 

DO WHILE ( Shepe_Name-She| 

ShapeCount * ShapeCoun 
SKIP 
ENDDO 

X * ShapeCount * Co s t _St 
? ShapeStore,ShapeCount, 

ENDDO 

SET PRINT OFF 
SET SAFETY ON 
SET TALK ON 

■»»»•&*•»■»•!!•■* 

» MIGLIORIE SUGGERITE * 


ipeStore) .AND-C Shape_Cost“Cost_Store ) .AND..NOT. E0F() 
t + 1 


ore 

Cos t _Store,X 


h Questo programma è stato volutamente se 
h che i principi delle operazioni potesse 
h in altri linguaggi come BASIC e PASCAL. 

k 

In ogni modo, poiché disegnare un testo 
' una buona idea per migliorare i tempi p 

■ database secondario per eseguire il loo 

• elementi anziché memorizzare il costo c 

■ di testo. Questo permetterebbe di ridur 
L ciascuna stringa di testo assciata ad u 

• 

Fate riferimento al vostro manuale dBas 


ritto in maniera semplice in modo 
ro essere facilmente implementate 


in grafica richiede molti calcoli, 
uò e-ss-ere quella di utilizzare un 
K up dei costi associati ai singoli 
ome una parte di ciascuna stringa 
re sensibilmente la lunghezza di 
n elemento. 


e per l'uso di database multipli 

» -5 *#-**->* ■» * -»•&*-*« ■» ■> -* » ■> «■ tt ■» •» # ìi- ->* - 



Esempio di un complesso polifunzionale di cui è possibile calcolare i costi di realizzazione in bre¬ 
vissimo tempo grazie all'uso del programma che vi presentiamo. 


segnatore e pensiamo alla fatica ed allo 
stress che saranno necessari per la realiz¬ 
zazione di una tavola formato AO (circa 120 
x 84 cm) che contiene ad esempio un inter¬ 
vento di ristrutturazione di un appartamen¬ 
to con la fornitura di tutti gli impianti di tipo 
elettrico e/o idraulico, tutti gli arredi, le lam¬ 
pade, gli interruttori, i condizionatori d’aria, 
i pavimenti, per arrivare per assurdo addirit¬ 
tura alle viti. 

Alla fine della giornata vorremmo pretende¬ 
re improvvisamente di avere fornito entro 
una ventina di minuti il costo dettagliato 
dell’intervento sommenzionato. 


Valutiamo le possibili soluzioni: 


A - abbiamo a che fare con un adepto dei 
buoni samaritani e pertanto costui tirerà fi¬ 
no a mezzanotte per darci un’idea appros¬ 
simata dei costi. 


B - il tipo è normale e scende di corsa per 
acquistarci un biglietto di sola andata per il 
famosissimo "quel paese" 


C - lo studio è attrezzato con un sistema 
CAD e, in tempi molto più rapidi del richie¬ 
sto, avremo la nostra risposta con esattez¬ 
za matematica. 


L’esempio, ovviamente, è indipendente dal 
tipo di disegno e può essere valido e appli¬ 
cato ai più svariati campi; dall’elettronica 
all’idraulica per finire in agricoltura od in un 
laboratorio di tricologia (trapianto di capel¬ 
li). 

Il programma che presentiamo questo me¬ 
se permette di utilizzare un file generato da 
TurboCAD come file di processo per un 
programma in dBase. 

È chiaro che stiamo utilizzando solo due in¬ 
formazioni e cioè il nome ed il costo di un 
elemento ma nulla ci impedirebbe di am¬ 
pliare il tutto con tempi, nome dei fornitori, 
priorità ed eventuali alternative. 

Il disegno che accompagna l’articolo de¬ 
scrive un considerevole complesso polifun¬ 
zionale, di sicuro peso urbanistico: immagi¬ 
nate il risparmio di tempo e di errori che co¬ 
me ben sappiamo sono sempre in agguato, 
con il sistema da noi, questo mese suggeri¬ 
to. 

Volete provare a seguire quindi quanto sino 
ad ora appreso? 

Buon divertimento. 
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SARIN/AP 


LA TELEAUDIOCONFERENZA MULTI SALA ì 



GRUPPO IRI-STET 



/VICINA LE IDEE. 



UN INCONTRO 
DI LAVORO 
SULLA RETE 
FONIA DATI. 

Accomodatevi sulla RETE FONIA DATI ed iniziate la vostra riunione di lavo¬ 
ro. Senza problemi di prenotazioni, appuntamenti, orari, senza sprecare 
energie in lunghi viaggi: ha pensato a tutto la TELEAUDIOCONFERENZA 
MULTISALA SIP. Vi riunite, discutete, vi scambiate documenti anche a 
centinaia di chilometri di distanza restando nella vostra azienda, nella sa¬ 
la riunioni che SIP ha attrezzato per voi con i più moderni apparati di tele¬ 
comunicazione: terminali per trasmissione dati, facsimile, videoscrittura 
e videolento per la trasmissione di immagini. E' un servizio a disposizione 
degli utenti della Rete Fonia Dati che può collegare fino a 16 sale 
contemporaneamente, senza limite al numero dei partecipanti, garan¬ 
tendo il massimo dell'efficienza e della riservatezza. I costi sono conte¬ 
nuti e correlati all'effettivo tempo di utilizzazione. La tecnologia delle 
■:<3 BìMIEkM 3 migliora anche la qualità del lavoro. 



Se desiderate ulteriori informazioni sulla TELEAUDIOCONFERENZA MULTISALA RDF compilate e inviate il 
coupon allegato a: SIP - Direzione Generale M/MK-NP - Casello Postale 2420 - 00100 Romo AD. 

Azienda_ 

Settore di attività dell'Azienda_ 

Via_N._Città_ 

CAP_Provincia_Regione_ 

Nominativo dell'interessato_ 

Tel. (pref./numero)_ 

Desidero ricevere: □ materiale informativo su \j~Fd~ 

□ la visita di un funzionario SIP 

Ho letto l'annuncio su: (nome giornale)_ 


RETI D'AUTORE 
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BBS & ECOLOGIA 

ERCHÈ NO! PARLIAMO D 
QUINAMENTO 



di PAOLO CIARDELLI 

Mikrobbs è un Bulletin Board Service (BBS) 
privato, creato allo scopo di aumentare 
rofferta telematica nell 1 a rea romana, an¬ 
che se naturalmente, parole del suo gesto¬ 
re Vinicio Coletti, sono ben accetti colle¬ 
gamenti da tutta Italia e... da tutto il mon¬ 
do! 


a prima peculiarità di questo 
punto di incontro telematico 
è il programma che la gesti¬ 
sce. 

Questo Software è stato inte¬ 
ramente scritto da Vinicio in Turbo Pascal 
3.0 e aspetta di essere rivisitato e compilato 
di nuovo con la nuova versione 5.0. 


La cosa è già stupefacente e rara in Italia 
specie se si considerano le caratteristiche 
del software utilizzato. 

Utilizza routine di pubblico dominio ASYNC 
per gestire la porta seriale ed il modulo 
esterno DSZ.COM per implementare i pro¬ 
tocolli di trasmissione binaria xmodem, 
xmodem ere, ymodem batch e zmodem. 


Grazie all'ausilio della telematica riusciremo a 
riavere più in fretta cieli puliti in cui volare. 


Ma quando si viene a sapere che il pro¬ 
gramma sorgente è composto da circa 
3.200 linee, beh ci viene da toglierci il cap¬ 
pello di fronte a tanta passione. 
Chiaramente il software di Mikrobbs può 
essere acquistato da chiunque voglia apri¬ 
re un nuovo BBS e gli interessati sono pre¬ 
gati di rivolgersi al gestore del sistema (u- 
tente numero 0) con messaggio privato o 
telegramma. 

Si telegramma, un altro degli aspetti unici di 
questo programma: 

“telegrammi" ovvero brevi messaggi perso¬ 
nali che appaiono automaticamente al lo- 
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gon del destinatario. 


DATABASE INTERATTIVO 

Mikrobbs è supportata da un database in¬ 
terattivo a pagine e menu in stile Videotel 
ma in ASCII puro, in modo da poter essere 
utilizzato con un qualunque programma di 
comunicazione. 

Da febbraio di quest’anno ospita la prima 
base di dati ECOLOGICA AMATORIALE e 
perla di questo servizio sono dei file di do¬ 
cumentazione sul riciclaggio ed il problema 
Amazzonia, disponibili in area file OI-ECO- 
FILES 


SISTEMA A PAGINE INTERATTIVE 

Questa sezione del database riporta infor¬ 
mazioni utili sull’utilizzo del BBS. Se ne con¬ 
siglia la lettura a tutti gli utenti, perché an¬ 
che se molte opzioni possono sembrare si¬ 
mili a quelle di altri programmi di gestione, 
sono presenti delle differenze di cui è bene 
essere a conoscenza per utilizzare al me¬ 
glio Mikrobbs. 


HARDWARE 

Mikrobbs 1.0 può girare su un qualsiasi si¬ 
stema MS-DOS, con almeno un floppy disk, 
384KByte RAM, una porta seriale ed un mo¬ 
dem con comandi HAYES. 

In questo caso il programma utilizza un XT 
compatibile, con 640KByte RAM ed hard 
disk da 20 MByte, di cui circa 12 saranno 
dedicati al BBS. 

Niente di megagalattico, ma ragazzi en¬ 
trando nell’area dati di inquinamento ci si 
trova di fronte ad una marea di dati che a 
malincuore, non è il nostro campo, non 
consultiamo a dovere. 


COME SI USA - PARAMETRI 
DEI TERMINALE 

Oltre alle informazioni anagrafiche che ci 
vengono richieste al momento della iscri¬ 
zione, nel menu Util troviamo altre opzioni 
con cui ridefinire la configurazione di termi¬ 
nale utente. 

Si può specificare il numero di righe dello 
schermo, S indica alla richiesta di blocco 
dello scroll, in modo che le liste lunghe si 
blocchino ad ogni fine pagina. 


Le colonne dello schermo servono invece a 
spezzare i testi in modo che nessuna parola 
sia troncata ed anche per un buon funzio¬ 
namento dell’editor dei messaggi. 

La richiesta di caratteri ANSI fa si che lo 
schermo si cancelli ad ogni nuovo invio di 
pagina del database (ed in altri casi). 


LIVELLI DI ACCESSO 

Ad ogni utente è assegnato un livello di ac¬ 
cesso compreso tra 1 e 9, mentre il livello 0 è 
riservato agli utenti cancellati o disabilitati 
temporaneamente. 

Il livello 9 dà un accesso completo al siste¬ 
ma e permette la esecuzione di utility e la 
modifica dei dati degli altri utenti. 

È pertanto riservato a chi gestisce il BBS o è 
addetto alla manutenzione. 

I livelli da 1 ad 8 sono assegnati agli utenti a 
discrezione del gestore. Essi permettono un 
accesso differenziato alle seguenti attività: 

messaggi privati al sysop 
messaggi privati agli altri utenti 
accesso al menu conferenze 
accesso al menu file 
accesso ai database 
elenco utenti 

Inoltre ad ogni conferenza è associato un 
livello in lettura ed uno in scrittura, mentre 
alle aree file un livello di upload ed uno di 
download. 

Se l’utente non può compiere nessuna atti¬ 
vità in una conferenza o area file, essa non 
appare neanche in elenco (area riservata). 


MESSAGGI PRIVATI 

Per spedire un messaggio ad un altro uten¬ 
te di Mikrobbs, si deve entrare nel menu 
Priv. Basta poi selezionare Scrivi e scrivere il 
messaggio nelle apposite righe. 

Nel Menu Testo è possibile listare il mes¬ 
saggio e modificare eventualmente quanto 
appena scritto (opzione Edit). 

Premendo infine Sped il messaggio viene 
spedito. 

Per spedire messaggi al gestore, inviare al¬ 
l’utente num. 0 

Con Elen o New si listano i messaggi in arri¬ 
vo ed in partenza, mentre con Leggi vengo¬ 
no letti i messaggi appena listati. 

I Telegrammi sono invece dei messaggi lun¬ 
ghi al massimo 80 caratteri che vengono vi¬ 
sualizzati automaticamente al logon del de¬ 
stinatario. 


COME SI USA - CONFERENZE 

Si tratta di aree pubbliche identificate da un 
codice di due cifre compreso tra 01 e 32 
(id). Dal menu principale si accede alle con¬ 
ferenze con l’opzione Conf. L’opzione De- 
scr consente quindi di listare le conferenze 
disponibili. Di ognuna viene indicato l’id, un 
nome breve e la descrizione del contenuto. 
Viene anche segnalato il livello di lettura e 
di scrittura. 

Per selezionare una data conferenza, basta 
digitare le due cifre dell'id. 

Una volta aH’interno con Elen di legge l’e¬ 
lenco dei messaggi a partire dal primo in¬ 
serito. Con New si leggono solo i messaggi 
non ancora letti mentre con Data e poi Elen 
si possono listare i messaggi a partire da 
una certa data. Naturalmente è possibile 
Leggere un messaggio o Scriverne uno. 

I messaggi nelle conferenze sono pubblici. 

II menu lettura messaggio consente di leg¬ 
gere un certo messaggio (inserire il numero 
progressivo) il precedente (-) o successivo 
( + ) oppure tutti i messaggi successivi al¬ 
l’ultimo letto (Cont). 

Con * si rilegge l’ultimo messaggio. 

COME SI USA - AREE FILE 

Ogni area file ha un livello di download ed 
uno di upload. 

Allo stesso modo delle conferenze, ogni 
area è identificata da un codice di due cifre. 
Nel caso che un utente abbia un livello 
troppo basso sia per gli upload che per i 
download, l’area risulta totalmente inac¬ 
cessibile. 

Il programma provvede a registrare la 
quantità di dati caricata nel sistema o scari¬ 
cata nel computer dell'utente. 

Ogni nuovo utente ha un credito di lOOKby- 
te. Per download ulteriori bisogna necessa¬ 
riamente caricare qualcosa e, per ogni Kby- 
te caricato se ne potranno scaricare 5. 
Nella fase sperimentale di MIKROBBS que¬ 
sta opzione, implementata solo in parte, 
non viene utilizzata e si può quindi proce¬ 
dere senza limiti. 


COME SI USA - DATABASE 

Mikrobbs è uno dei pochi sistemi a suppor¬ 
tare, oltre ai tipici servizi offerti dai BBS, an¬ 
che l’accesso interattivo ad una serie di pa¬ 
gine di dati. L’uso per l’utente è dei più sem¬ 
plici: si deve solo selezionare l'opzione D 
(per Db) dal menu principale, poi A (per Ac- 
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L’ANGOLO DELL ’INTERVISTA 


MIKROBBS 1.3 - (C) 

1988 1989 Vinicio Coletti - KRX321DE 

MIKRO 

Bulletin Board Service 

ATTENZIONE: inserire la password 
rispettando minuscole e maiuscole 
Inserire il NUMERO UTENTE, non il 
proprio "soprannome" 

Per consultare ECOBASE senza 
iscriversi, numero utente: 100 

Numero utente (oppure NEW): new 
Per abbonarti a MIKROBBS devi 
fornire dei dati anagrafici VERI 
E VERIFICABILI l'abbonamento è 
ASSOLUTAMENTE GRATUITO. 

Le associazioni sono pregate di 
prendere contatto telefonando a 
voce o a mezzo lettera. 

Sarai abilitato completamente 
dopo verifica telefonica. 

Nel frattempo, se hai delle 
richieste, puoi spedire un msg 
privato (Priv) all'utente 0 
(sysop). Comunica nel messaggio 
il tuo numero di mailbox Videotel 
(codice di 9 cifre), in modo da 
rendere più rapida la tua 
abilitazione. 

I DATI RELATIVI AGLI UTENTI NON 
SONO CONSERVATI SU SUPPORTO 
MAGNETICO. 


ORARIO: 18 - 23 tutti i giorni 


Mikrobbs è interessata ad avere 
notizie del Turbo Pascal 5.0 


DA FEBBRAIO 89 MIKROBBS OSPITA LA 
PRIMA BASE DATI ECOLOGICA AMATORIALE. 
File su riciclaggio ed Amazzonia 
disponibili in area file Ol-ECOFILES 


Gli utenti C64/6499 per trasferire 
file devono usare il programma 
Laserterm o equivalente. 


List: “Intervistiamo volentieri il sysop di Mik¬ 
robbs, la prima ad occuparsi di ecologia." 

Mikrobbs: “Mi chiamo Vinicio Coletti, ho 
trentanni e mi occupo di informatica dal 
1979, per lavoro e per interesse personale. 
Per collegarsi a Mikrobbs bisogna disporre 
di un qualsiasi computer e di un modem in 
standard CCITT V21 (300 baud full duplex) 
o V22 (1200 baud full duplex). Il sistema è 
aperto dalle ore 18 alle ore 23 tutti i giorni 
senza eccezioni. Prossimamente è previsto 
un prolungamento deH’orario. Dimenticavo, 
il numero di telefono è 06/258.23.07.” 

List: “Parliamo un po’ della storia di Mik¬ 
robbs, ovvero come nasce un BBS fatto in 
casa.” 

Mikrobbs: “Il progetto “Mikrobbs” nasce 
nel luglio del 1988, complice forse un colpo 
di sole, ero in attesa di partire per le sospi¬ 
rate ferie e mi sono imbarcato nell’avventu¬ 
ra di scrivere un programma di gestione per 
un Bulletin Board System. Iniziai dunque a 
scrivere in Turbo Pascal su di un personal 
XT-compatibile le prime essenziali routine 
di gestione della porta seriale e di ricezio¬ 
ne/spedizione caratteri. 

Queste routine furono costruite in modo da 
"sapere” se il collegamento in corso era re¬ 
moto o locale, comportandosi di conse¬ 
guenza. 

Tutto il resto del programma avrebbe quin¬ 
di potuto, a seguito di questa scelta, essere 
testato rapidamente ed efficacemente an¬ 
che senza collegamenti di prova.” 


cesso) e quindi fornire il nome di uno dei 
database consultabili. 

Dando invece un INVIO a vuoto, si entra nel 
database principale (si chiama MENU) che 
contiene molte informazioni e da la possibi¬ 
lità di accedere in “gateway” agli altri grup¬ 
pi di dati. 

Se si dispone di un programma di comuni¬ 
cazione che riconosce le sequenze di con¬ 
trollo ANSI, conviene configurare il profilo 
utente rispondendo S alla richiesta di even¬ 
tuali caratteri ANSI (dal menu principale 
opzioni Util e poi Term). 

Le sequenze ANSI sono utilizzate soprattut¬ 
to nel database e non rendono più lenta la 
consultazione delle altre aree del sistema. 
Nel database migliorano l’estetica e la com¬ 
prensibilità delle pagine, addirittura velociz¬ 
zando la trasmissione, ad esempio nel caso 
di scritte a centro pagina. 


List: “Questo per quanto riguarda il corpo 
generale del programma, ma per le routine 
accessorie?” 

Mikrobbs: “Per gestire a livello basso la 
porta RS-232 decisi di impiegare le routine 
di pubblico dominio ASYNC.INC ed anche 
grazie all’aiuto di amici furono effettuati i 
primi collegamenti destinati alla messa a 
punto dei moduli di attesa collegamento, 
logon ecc. 

Per quanto riguarda l’editor on-line, uno 
dei moduli di maggiore complessità, invece 
lo misi a punto personalmente.” 

List: "Una lunga estate calda...” 

Mikrobbs: “Si ma provvidenzialmente, l’arri¬ 
vo di agosto segnò la fine di questa prima 
fase del progetto. A settembre ripresi il lavo¬ 


ro e scrissi il codice relativo alla gestione 
messaggi privati, conferenze ed aree dati.” 

List “Parliamo un po’ della parte che inte¬ 
ressa maggiormente l’utenza: i protocolli di 
trasmissione.” 

Mikrobbs: "Per i file ho progettato solo la 
parte relativa ai trasferimenti in puro ASCII, 
mentre per la spedizione e ricezione con 
controllo degli errori l’ho affidata al modulo 
esterno DSZ.COM, ben conosciuto da 
quanti si occupano di telematica con com¬ 
puter MS-DOS o UNIX." 

List: "Ricordiamo che il programma DSZ 
permette l’uso dei protocolli Xmodem (sia 
blocchi da 128 byte che da 1024), Ymodem 
batch e, soprattutto, Zmodem. 

Mikrobbs: “Esatto. Quest’ultimo utilizza 
blocchi che variano a seconda dello stato 
della linea, permettendo così di minimizzare 
sempre il tempo di trasmissione e dispone 
di un sofisticato sistema di recovery per ri¬ 
prendere la ricezione di un file interrotta per 
motivi di forza maggiore (caduta della linea 
ecc.).” 

List: “A parte la gratificazione di aver scritto 
un programma di bbs “in casa”, che altro 
offre questa soluzione?” 

Mikrobbs: “Uno dei vantaggi di un pro¬ 
gramma self-made è indubbiamente costi¬ 
tuito dalla possibilità di “cucirlo su misura” 
per le proprie esigenze. 

Ora che Mikrobbs ha tutte le caratteristiche 
di altri programmi commerciali, perché non 
aggiungere qualcosa di innovativo? E così 
ho introdotto le tre nuove opzioni: i "tele¬ 
grammi”, gli “spot” ed il “database”.’’ 

List: “Di queste caratteristiche innovative, 
ne abbiamo parlato prima, ma a quale 
standard ti sei rifatto? 

Mikrobbs: “L’ispirazione è venuta chiara¬ 
mente dal Videotel della SIP e prevede la 
costruzione di uno o più database agendo 
semplicemente sui dati e senza bisogno di 
modificare il programma in alcun modo. 
Da ogni pagina si possono definire centi¬ 
naia di puntatori verso altre pagine ed as¬ 
sociati a comandi arbitrari (normalmente 
non si superano i dieci rimandi). Una modi¬ 
fica successiva ha consentito di aggiunge¬ 
re la bellezza della grafica a colori AN- 
SI/IBM nelle pagine database.” 
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TELEMATICA 


Adattatore 

Te le ma ti co 
Commodore 

Un successo è un successo, per cui pensia- 


...ED ANCHE IL VOSTRO C64 SI COLLEGA 
CON IL MONDO TELEMATICO! 


mo di fornire un utile servizio ai nostri let¬ 
tori parlando ancora una volta della peri¬ 
ferica Commodore 6499 


obbiamo riconoscere che 
l’ormai “anzianotto” C64 
continua a rimanere sulla 
breccia, senza darsi per vin¬ 
to. 

Ne è la riprova la sua straordinaria duttilità 
anche nell’ambito delle telecomunicazioni, 
grazie all’adattatore telematico. 

Questo apparecchio, naturalmente compa¬ 
tibile con il disk drive, il registratore a cas¬ 
sette e le stampanti della classe MPS, occu¬ 
pa la porta per le cartucce e non può quindi 
essere abbinato ad altre espansioni che 
occupano questo slot, a meno che non di¬ 
sponiate di una scheda per la connessione 
di più cartucce. 


INSTALLAZIONE 

Dopo esservi assicurati che il computer sia 
spento, inserite a fondo l’adattatore nello 
slot per le cartucce. 

Fatto ciò non resta che collegare alla linea 
telefonica il cavo che fuoriesce dall’adatta¬ 
tore, dotato di una spina tripolare passan¬ 
te. 

Sebbene questa spina sia del tipo utilizzato 
dalla maggioranza degli impianti telefonici 
italiani, nel caso abbiate un impianto senza 


presa o con una presa diversa, basterà ri¬ 
chiedere l'intervento della SIP per la sostitu¬ 
zione. 

La procedura da seguire per connetterlo 
insieme al telefono è molto semplice: sfilate 
la spina a cui è collegato l'apparecchio te¬ 
lefonico, infilate la spina passante dell’a¬ 
dattatore e ricollegate la spina del telefono. 
Potrete constatare che, sollevando il ricevi¬ 
tore del telefono, tutto funzionerà come se 
l'adattatore non fosse collegato. 

A questo punto potete accendere le perife¬ 
riche e poi il computer. 

Dopo circa 5 secondi apparirà sullo scher¬ 
mo il MENU con le opzioni disponibili. 


COME SI USA L ADATTATORE 

Le opzioni che appaiono sul menu posso¬ 
no essere di colore verde oppure rosso: 
quelle verdi sono attive, mentre quelle rosse 
non possono essere selezionate. 

Per chiarire se il drive non è collegato al 
computer, tutte le opzioni riguardanti la ge¬ 
stione del disco saranno scritte in rosso. 
Con il tasto funzione F5 entrerete in am¬ 
biente “VIDEOTEL”. Per effettuare il colle¬ 
gamento premete “FI ” e digitate il numero 
165 seguito da “RETURN”. 

Se avete seguito tutte le nostre istruzioni 
sentirete suonare il telefono in modo inter¬ 
mittente, segno che il computer sta compo¬ 
nendo il numero, e sul video leggerete il 
messaggio “Attendo Carrier” (significa che 
il computer è in attesa della portante). 


INIZIALIZZAZIONE 

Le operazioni di settaggio sono necessarie 
solamente se la vostra configurazione non 
è quella che il software dell’adattatore tele¬ 
matico considera per default, ovvero disk 
drive o registratore e stampante Commodo¬ 
re. 

In questo caso potete modificare l’imposta¬ 
zione standard, scegliendo nel menu prin¬ 
cipale l’opzione associata al tasto "F6”. 
Avrete così la possibilità di selezionare il ti¬ 
po di stampante da voi utilizzato, e di richie¬ 
dere, se necessario, un LINE FEED dopo 
ogni CARRIAGE RETURN, utile nel caso di 
stampante di classe non Commodore, in¬ 
fatti, potrebbe succedere che l’avanzamen¬ 
to della carta non sia automatico ma sia 
necessario fornire un comando supple¬ 
mentare. Comunque sarà sufficiente ese¬ 
guire una stampa di prova, per verificare la 
necessità del LINE FEED. 

A questo punto viene richiesto il numero lo¬ 
gico assegnato alla stampante che può es¬ 
sere 4, 5, 6 o Centronics. Fate molta atten¬ 
zione, durante i collegamenti telefonici, a 
non chiedere la stampa se non è presente 
la stampante, perché in questo caso provo¬ 
cherete l’arresto del programma e dovrete 
spengere il computer per ricominciare da 
capo. 

Infine si può scegliere tra nastro e disco, co¬ 
me tipo di memoria di massa da utilizzare 
per l'archiviazione delle Mailbox, dei file di 
testo e dei programmi. Il numero di device 
del drive può essere 8 o 9. 
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MENU PRINCIPALE 

Ecco il menu che viene proposto al’accen- 
sione: 

FI) Agenda su disk 
F2) Carica funzioni extra 
F3) Esecuzioni funzioni extra 
F4) Modo disk 
F5) VIDEOTEL 
F6) Periferiche 

F7) PAGINE GIALLE ELETTRONICHE 
F8) Basic C-64 

Agenda su disk “FI” 

È possibile utilizzare un programma che 
necessita del drive per il suo funzionamen¬ 
to, in grado di memorizzare i numeri di tele¬ 
fono delle varie banche dati, i loro nomi di 
servizio, i parametri di connessione ed un 
eventuale commento. 

Sarà quindi possibile effettuare automati¬ 
camente il collegamento con la banca dati 
desiderata. 

Carica funzioni extra “F2” 

Questa opzione vi da la possibilità di imple¬ 
mentare nuove funzioni per l’adattatore te¬ 
lematico, caricandole da nastro o disco. 

In questo modo non sarà necessario inter¬ 
venire sulla ROM interna dell'apparecchio 
per eventuali espansioni. 

Esecuzioni funzioni extra “F3” 

Con questa opzione vengono attivate le 
nuove funzioni caricate con F2. Avrete così 
la possibilità di elaborare nuove prestazioni 
che potranno essere integrate al pacchetto. 

Modo disk "F4” 

Selezionando il tasto funzione F4 avrete via 
libera nel vostro drive! Potrete infatti acce¬ 
dere alla directory del disco, o impartire un 
comando DOS. Digitando “RETURN” si tor¬ 
na al menu principale. 

Videotel “F5” 

Con F5 si accede al VIDEOTEL o alle varie 
banche dati. Verrà così selezionato un par¬ 
ticolare protocollo di comunicazione e la vi¬ 
sualizzazione grafica a colori. Inoltre appa¬ 
rirà il sottomenu di collegamento. 


Periferiche “F6” 

Di questa opzione abbiamo già parlato dif¬ 
fusamente sopra, quando abbiamo descrit¬ 
to l’inizializzazione. 

P.G.E/B.B.S. “F7” 

Nei casi in cui non esiste uno standard di 
baud rate, parità e lunghezza prefissate 
(come per il VIDEOTEXT), possiamo sce¬ 
gliere e definire diverse configurazioni. 
Esistono ad esempio banche dati (B.B.S.) 
che trasmettono solo caratteri, come le PA¬ 
GINE GIALLE ELETTRONICHE. 

In questi casi è prevista tutta una serie di 
parametri definibili attraverso questa op¬ 
zione. 

Basic C-64 “F8” 

Questa opzione è stata prevista per evitare 
di dover disconnettere il vostro adattatore 
ogni volta che si vuole utilizzare il BASIC del 
C64. 

Infatti accendendo il computer, parte auto¬ 
maticamente il software contenuto nel¬ 
l'adattatore, e non risulta quindi possibile 
accedere al C64 nel modo classico. 

fine prima parte 


PROGRAMMA PER 
AGENDA ELETTRONICA 


Il listato che vi forniamo con questo articolo 
permette di agevolare ulteriormente il colle¬ 
gamento con le varie banche dati. 

Il nome dei vari servizi, il corrispondente nu¬ 
mero telefonico e il valore di tutti i parametri 
di connessione, vengono memorizzati in 
una rubrica su disco, per poi essere richia¬ 
mati automaticamente quando lo desidera¬ 
te. 

Lanciate il programma “Agenda elettroni¬ 
ca” e digitate i dati dei servizi che volete in¬ 
serire nella rubrica (basta seguire le istru¬ 
zioni fornite dal programma stesso). 

Tutte le informazioni verranno registrate nel 
file “CELINTRUBRICAMK”. 

Ogni volta che vorrete inserire nuovi dati 
nell’agenda, dovrete seguire questo proce¬ 
dimento. 

A questo punto attivate il vostro adattatore 
telematico, e richiedete l’opzione FI: il soft¬ 
ware contenuto nell’adattatore cercher sul 
disco il file con i dati, e visualizzer l'elenco 
numerato dei servizi disponibili. 

Per collegarsi con una di queste banche 
dati baster digitare il corrispondente nume¬ 
ro d’ordine, e di collegamento avverrà auto¬ 
maticamente 


1 REM *** AGENDA ELETTRONICA *** 

2 : 

5 CDS=”CELINTRUBRICAMK” 

6 SPS=” REM 16 SPAZI 

7 CSS =CHRS(147):REM PULISCE SCHERMO 

8 DS =CHR$(17):REM CURSORE IN BASSO 

9 PRINT CHRSC14) CHRS(8); 

10 : 

20 OPEN 15,8,15,”P 
30 REM FILE ESISTENTE 9 
40 OPEN 8,8,8,”0:”+CDS*”,S,R” 

50 INPUT#15,E,ES,T,S 
60 CL0SE8 

70 IF E=0 THEN 100 

80 OPEN 8,8,8,”0:”*CDSi”,S,W” 

90 GOTO 110 

100 OPEN 8,8,8, ' 1 0: ”+CDS+’\S,A” 

110 REM AGGIUNGIAMO DATI 
120 : 

200 PRINT CS$DSDS”AGENDA/AGENDAtPARAM./E 
SCI (A,P,E)”; 

210 GETQS:IFQS=””THEN210 

220 IFQ$=”E”THEN900 

230 I FQ$=’VHHENPR I NTQS : TS=32 : GOTO300 

240 I FQ$ *’FTHENPR INTQS ; TS =64 : GOTO300 

250 GOTO210 

300 PRINT D$DS”N0ME SERVIZIO (12 CAR'P; 
310 INPUT SNS 

320 PRINT DSDS”NUMER0 DA CHIAMARE”; 

330 INPUT NOS 


340 IF TS=32 THENP1=0:P2 =0:P3=0:GOTO800 
400 PRINT DSDS”(A) 1200/75 (B) 300/300 
?”; 

410 GETQS : IFQSo ”A”ANDQ$ < > ”B”THEN410 
420 PRINTQS:P1=1:1FQS =”B”THENP1=3 
430 PRINT DSDS”PARITA’ (1-5) 9 ”; 

440 GETQS: IFQS<”1”ORQS>”5”THEN440 
450 P2=VAL(QS) 

460 PRINTQS:PRINTDSDS”ECHO (S/N)?”; 

470 GOSUB950 

480 P3=0:IFYS=”S”THENP3=128 
490 PRINTYS:PRINTDSDS”AUTO LINE FEED (S/ 
N)?” 

500 GOSUB950 

510 IFYS=”S”THENP3=P3+64 

520 PRINTYS 

800 PRINT#8,CHR$(TS); 

810 PRINT#8,LEFTS(SNS+SPS,12); 

820 PRINT#8,LEFTS(NOS +CHRS(0)+SPS,16); 
830 PRINT#8,CHRS(P1)CHRS(P2)CHRS(P3); 

840 INPUT#15,E,E$,T,S 
850 IF E=0 THEN 200 
900 CL0SE8 

910 PRINT CSS”FINITO”:PRINT:PRINT 
920 F0RL=1T08:READX:P0KE49151+L,X:NEXT 
930 SYS49152 

940 DATA 169,0,141,16,222,108,252,255 
950 GETYS: IFYS<>”S”ANDYS<>”N”THEN950 
960 RETURN 
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TELEMATICA 


di PAOLO CIARDELLI 


Sono le dimensioni una delle pecularietà 
maggiori di questo prodotto, grande pres¬ 
sapoco come un pacchetto di sigarette. 
Forse i costruttori di questo minimodem 
Hayes compatibile hanno imboccato que¬ 
sta strada per superare concorrenti più co¬ 
stosi 


er consentire al proprio per- 
A sonai di dialogare con altri 

I computer o di accedere ai 

vari servizi telematici è indi¬ 
spensabile un modem, acro¬ 
nimo di Modulatore DEMolutare, un’inter¬ 
faccia oggi disponibile in numerose versio¬ 
ni che si differenziano per funzioni, velocità 
e integrabilità con i vari sistemi. 

L’SM12MM, che abbiamo provato, ha una 
collocazione molto particolare aH’interno 
del proprio mercato. 

Innanzitutto, ha dimensioni molto ridotte 
che favoriscono l’accoppiamento a com¬ 
puter portatili e più specificatamente a 
macchine diverse di standard, cioè che non 
gravitano obbligatoriamente nel mondo 
IBM. 


Ma è davvero talmente piccolo che ci ver¬ 
rebbe voglia di chiedere al nostro tabac¬ 
caio un "Minimodem 1200 col filtro”. 


COME SI PRESENTA 

Passato il primo momento di frizzo in cui 
abbiamo tentato di aprirlo ed offrirci una si¬ 
garetta, non abbiamo osato continuare 
nell’operazione per la paura che al momen¬ 
to di rimontarlo ci sarebbero avanzati i pez¬ 
zi. Scherzi a parte, la miniaturizzazione ha 
toccato vertici notevoli. 

Dobbiamo pensare che questo modem ha 
delle grandezze obbligate che sono rappre¬ 
sentate dal connettore a 25 poli e la batteria 
da 9 volt. 

Tutto qui, se no crediamo che sarebbe sta¬ 
to più piccolo ancora. 

Per dovere di cronaca sono presenti quat¬ 
tro led che segnalano se il modem è acce¬ 
so, lo stato delle batterie, la selezione della 
velocità (High Speed 1200 baud), la presen¬ 
za di modulazione sulla linea. 


UN MODEM 
COL FILTRO 


y n 






L’interruttore di accensione, l’ingresso e 
l’uscita della linea telefonica e l’ingresso 
per l’alimentazione da trasformatore e un 
dip switch, a cui si accede dal vano porta 
batteria, terminano la dotazione di prese, 
spine ed affini. 

STANDARD 

Le velocità supportate sono i 300 ed il 1200 
bit al secondo, un valore non particolar¬ 
mente elevato, lo ammettiamo ci piace cor¬ 
rere e sognare a 9.600, tornando con i piedi 
per terra giudichiamo più che sufficiente a 
inter comunicazioni per il trasferimento di 
file di medie di dimensioni. 

COHEGHIAMOLO 

Semplice e preciso, questo piccolo grande 
modem, fedele alla grandezza si inserisce 
nella presa seriale a 25 poli, lo si allaccia al¬ 
la rete (se non vi fidate della batteria) trami¬ 
te il trasformatore e via con il cordone tele¬ 
fonico con quella strana ma ormai usuale 
spinetta trasparente a quattro fili è pronto 
all’uso. Forse non lo avevamo scritto, dan¬ 
dolo come valore di default, ma questo mo¬ 
dem è Hayes compatibile. 


Il che vuol dire che è in grado di riconoscere 
e utilizzare tutta quella serie di comandi di¬ 
venuti uno standard per la gestione della 
comunicazione via modem. 

Beh, visto che era così minuto ce ne siamo 
approfittati ed invece di pilotarlo con un co¬ 
mune software, vedi procomm o altro, lo 
abbiamo collegato alla nostra piccola BBS. 
Una notte intera di lavoro, collegamenti, 
scambio di posta ed altro. Una notte brava 
per il nostro piccolo grande modem che 
non fatto riscontrare difetti attribuibili alla 
sua elettronica o altro, anzi incredibile dic- 
tu, qualche utente ignaro ci ha chiesto se lo 
avessimo sostituito con uno professionale. 

PREZZO E CONCLUSIONI 

Il prezzo relativamente contenuto, 230 mila 
lire, è adeguato alle prestazioni e alle fun¬ 
zioni e pensiamo per le tasche di tutti. 

In sostanza, il Minimodem è un onesto mo¬ 
dem portatile, con l’indubbio vantaggio del¬ 
le dimensioni e dell’indipendenza dell’ali¬ 
mentatore. paragonabile come qualità per¬ 
sino a sistemi fissi o su scheda di costo su¬ 
periore. 

Insomma il messaggio pubbliciatario "più 
piccolo”, una volta tanto è vera. 
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TELEMATICA 


la Mela 

ENTRA IN RETE 


di PAOLO CIARDELU 


Vi presentiamo AUANET, una BBS servita 
da un Apple II GS, dedicata ai possessori 
di questo apparecchio . 

Intervista al gestore 


on sono lontani i tempi in cui 
Home Computer era sinoni¬ 
mo di Apple II. Basandosi su 
questa macchina, almeno in 
Europa ed in particolare in 
Italia, l’alfabetizzazione elettronica iniziò le 
sue lezioni introducendo la maggior parte 
di noi a questo mondo del futuro. 

È con nostalgia che ricordiamo i primi 
esemplari, la nuova release della ROM, le 
lettere minuscole, e gli aggiornamenti quali 
il PRODOS, i primi cloni che provenivano da 
Taiwan, le ore passate a giocare ad INVA- 
DERS o a BREAKOUT. 

Ma il tempo passa e in questo tipo di am¬ 
biente, forse, scorre con una velocità supe¬ 
riore, rendendo obsolete macchine ancora 
valide. 

La casa madre, chiaramente non è stata a 
guardare, si è evoluta, montando per la pri¬ 
ma volta un microprocessore, il 68000 sul 
Macintosh, tanto avveniristico da non poter 
esprimere in pieno le sua potenzialità nei 
primi modelli, infatti aveva installata solo 



una memoria di soli 128 Kbyte, praticamen¬ 
te insufficente a qualsiasi lavoro serio, un 
monitor a B/N e neanche un Hard Disk. 
Ma gli affezionati seguaci di quel poliedrico 
enfant prodige di Steve, lo seguirono sem¬ 
pre in tutte le sue sperimentazioni ed ora 
perciò il parco degli elaboratori, ancora 
presenti, ed il numero di utenti affezionati a 
questo tipo di computer non può essere 
messo da parte o passare nel dimentica¬ 
toio. 

Certo che però manifestazioni di protesta 
come quella che abbiamo visto alla scorsa 
edizione dello SMAU non danno una mano 
all’utente ma servono solo a noi per riempi¬ 
re e comporre un pezzo di “colore”. 

Al contrario iniziative come quella della neo 
nata rete ALIANET vanno incontro ad un si¬ 
curo seguito. 


CONTIAMOCI PER CONTARE 

Come sempre l’unione fa la forza e costa¬ 
tane una subito ne nascono altre e ben cin¬ 
que BBS si associano al Nord e si scambia¬ 
no posta, esperienze ed altro. 


Il sistema è dopo vari test, ci racconta Mas¬ 
simo, finalmente “on line” tutto il giorno, 
ma dovendo servirsi di una “Mela” qualche 
baco può essere scappato e perciò il gesto¬ 
re invita sempre gli utenti a lasciare un 
feedback dopo il quale vedrà di mettere tut¬ 
to a posto. 

Infatti anche se il sistema funziona 24 ore al 
giorno, la sera particolarmente tra le 19.00 e 
le 22.30 tende ad usarlo per fare manuten¬ 
zione o lavorarci e dialogare. 

Precisiamo che il sysop è costretto a lavo¬ 
rare col computer in queste ore perché il re¬ 
sto della giornata lo passa tutto all’universi¬ 
tà. 

Speriamo che in un prossimo futuro potrà 
pensare, (avere i soldi ndr) di prendere un 
secondo computer da adibire al 100% alla 
bbs tutto il giorno senza nessuna interru¬ 
zione casuale. 


The Apple ] [GS Land insiemeaTheApple][ 
Town BBS è la prima BBS in italia ad imple¬ 
mentare lo standard Proterm Special ed i 
suoi parametri di trasmissione sono i classi¬ 
ci 8-N-1. 

Chiaramente questa rete è dedicata a tutti 
gli utenti Apple (ma non solo a loro) ed è 
stato pensato in modo tale da poter diven¬ 
tare un punto di riferimento per gli appleisti. 
Tutti i servizi sono improntati all’amatoriali- 
tà ed il sysop quindi non si assume la mini¬ 
ma responsabilità per il tipo di EMail, Bulle- 
tin e File lasciati su questo sistema. 
Ognuno è libero di fare quello che vuole, 
ma nell’editoriale iniziale c’è un rimando al¬ 
l’aneddoto di Esopo: Giove ha dato all’uo- 
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TELEMATICA 


A. 

\/_ 


/ / 

/ / / / / 

\/_/ \/_/ V 


_ \\_\_/\_\\ _ 

_ // /_\/ // _ 

/ / / _ // _ \ 

// / // / _ \ 

/ _ / 


A _ \\ _ \\ _ \\_\ A_ 

/ / _ // // _ // / / / _ 

///_/// /_/ ////_//// / / / /_\ 

/ / _ // /_\/ // /_\/ // /_ / / _/_ 

////// _ // _ // / _ \ / / _ \ 

\/_A/ _ // _ / \/_/ \/ _ // _ / 


A. 

\/_ 


_\V 

.// 


AV 

y/ 


/\. 

\/. 


/////////_ / 
y / /_/ / /_ / / /\_\ /_ 

.\/ /_\/ /_\ / /_\/ / _ 

_ // _ // _ 


_\/ / 
_ / 


A. 


AY 

// 


/\_\ 

/ / / / / _ 

/ / / ///_/// 
///_//_ // /| 

/ / / _ \ /////// 

\/ _ //_/\/_//_/\/_ 


\A_\\ _ \ 

1/ // I 

// /I I 
// / / / 
// /_/ / 
// _ / 


[1200] BPS! 

Please turn on ProTERM Emulation NOW. If you do not wish to turn it 
on, or do not have it at this time, please hit <ESC>. Thank You. 


mo due bisacce una piccola sul davanti 
piena dei difetti altrui ed una molto più 
grande, dietro, piena dei nostri. 


Il SOFTWARE 

Il software usato è originale e fino ad ora 
inedito in Italia, proviene direttamente dagli 
States e chiunque incontri dei problemi la¬ 
sci pure un FeedBack che gli verrà risposto 
volentieri ma soprattutto NON SCORAG¬ 
GIATEVI non è facile come Opus ma un po’ 
di fatica vai bene il risultato. 


I HARDWARE 

II sistema gira su di un: 

Elaboratore Apple II GS 

1 Mbyte di memoria Ram 
1 Hard Disk 60MByte Mactronics (CMS) 
Partizionato per via hardware in 2 HD 30 
Mb. Attualmente solo 1 partizione è usata 
dal bbs. 

1 Drive da 3,5 pollici per il Disco di AutoBoot 
in caso di Reset e caduta della corrente 
1 Modem SmartModem V21-V22 della Mar 
Software ProTALK V2.1 di Parik Rao modifi¬ 
cato dal Sysop velocizzato completato e 
debuggato (dove necessario o possibile). 

Menu principale di Apple II GS Land 

[B] : Bulletin Boards 

[C] : Page SysOp 

[E] : Electronic Mail 

[F] : Feedback to SysOps 

[H] : Hang-Up 

[I] : System Information 
[L]: Scan Caller Logs 

[Q] : Global Quickscan Messages 

[R] : Reconfigure Statistics 

[U] : UserListings 

[V] : Vote Module 

[X]: Enter File Transfer System 

[YJ: Your Statistics 

[Z]: Examine System Statistics 

[G] : Games 

[]: Turn On ProTERM Emulation 
[!]: Help Files 


l ANGOLO DEH INTERVISTA 

Intervistiamo con piacere il sysop di questa 
bbs Massimo Savazzi. 

Dunque... Questa BBS è nata circa 1 anno 


fa però è divenuta operativa solo all’inizio 
di quest’anno sia a causa della SIP che non 
mi voleva installare la linea ma soprattutto 
perché ho cambiato due volte il software da 
usare. 

Quello che sto usando è una BBS scritta da 
un sysop americano, studiata apposita¬ 
mente per il //gs. Usa un particolare lin¬ 
guaggio chiamato Acos che assomiglia va¬ 
gamente al basic con label, con una parti¬ 
colare gestione dei file in modo da permet¬ 
tere un facile accesso ai messaggi e alle 
bulletin. 

L’idea con cui la bbs è nata è quella di di¬ 
ventare un punto di ritrovo per tutti gli utenti 
Apple con un modem. Non è per escludere 
amigaroli o ibmmisti ma una semplice esi¬ 
genza del sysop, infatti non voglio avere 
una gigabbs lentissima con 6000 utenti 
ignoti ma un centinaio di utenti che si cono¬ 
scono. L’idea è quindi quella di un punto 
d’incontro e di discussione. 

L’E-Mail e le Bulletin esistono proprio per 
questo e le ho tenute separate apposta, in 
quanto credo che una cosa sono i rapporti 
utente-utente un altra le discussioni o le ta¬ 
vole rotonde per tutti. 

L’aree trasferimento file sono state studiate 
in modo da evitare di avere quelle oscene li¬ 


ste di 650.000.000 files per cui non si capi¬ 
sce assolutamente niente ma permettono 
all’utente di andare subito nell'area deside¬ 
rata dove è sicuro di trovare solo i files di un 
certo tipo. Le aree sono quasi uguali per //, 
//GS, MAC in modo da permettere una clas¬ 
sificazione omogenea dei programmi sen¬ 
za dover ogni volta riguardare la lista delle 
aree. Vi sono parecchie aree programma¬ 
zione, (tre ndr) perché mi piacerebbe far di¬ 
ventare questa bbs un punto di aiuto reci¬ 
proco tra tutti i programmatori esistenti (so¬ 
no già pochi e la Apple Italia di certo non ci 
aiuta quindi trovo estremamente importan¬ 
te darsi una mano a vicenda). 

Siccome questa non è solo una bbs seria 
per persone con la faccia lunga ci sono an¬ 
che dei giochi più o meno belli solitari o tra 
utenti. 

La bbs non è ancora perfetta perché l’ho in 
buona parte riscritta a partire dal software 
originale... però i bug sono tutte piccolez¬ 
ze...particolarità... più che altro piccoli parti¬ 
colari di presentazione. 

Forse si riuscirà ad entrare in FidoNet attra- 
veso Alianet... per ora siamo in echo solo 
con loro... una rete composta tutta da bbs 
non MS-DOS ma fatte più o meno in casa... 
Ciao Massimo. 
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TELEMATICA 



Modem Card 

2400 HSI 


di PAOLO CIARDELLI 

Un modem italiano che vista la velocità ci 
fa ricordare che siamo la patria delle mac¬ 
chine da corsa 


n primo sguardo basta per 
capire che il made in Italy si 
distingue sia nella ricerca¬ 
tezza dei particolari che per 
l’ingegno che sempre ci ha 
contraddistinto. 

Vorremmo spendere una parola ancora per 
ricordare quanti prodotti dalla tecnologia 
all’avanguardia sono nati da menti medi- 
terranee e proprio nel campo della teleco¬ 
municazioni ne citiamo due a simbolo: 
Meucci, l’illustre sconosciuto inventore del 
telefono e l’ing. Faggin che ha inventato lo 
Z80 e che ora si sta interessando allo studio 
di nuovi tipi di telefoni. 

Terminata questa introduzione, entriamo 
nella parte più interessante dal punto di vi¬ 
sta tecnico. 


L'ELETTRONICA 

I componenti presenti sono ridotti all’osso e 
fa spicco oltre al solito 8250 (su alcuni mo¬ 
dem ormai sta sparendo NDR) un bel chip 
INTEL dal layout di un microprocessore che 
al suo interno ha tutti i componenti della 
parte MODEM vera e propria. 

La ROM con il linguaggio e una serie di 
jumper, dove tra l’altro si riesce a settare ol¬ 
tre alla porta di comunicazione la sensibili¬ 
tà terminano il tutto. 

Da segnalare i chip più critici sono stati mo- 
nati su zoccolo e che sulla scheda sono 
stati serigrafati la posizione e la sigla ripor¬ 
tata sullo schema elettrico. 


CARATTERISTICHE TECNICHE 

Come già detto la PCI 231 può funzionare in 
V21/BELL 103, in Full Duplex su due fili alla 
velocità di 300 bit/s, in V22/BELL 211A in 
Full Duplex su due fili alla velocità di 1200 
bit/s e in modo V22bis a 2400 bit/s per cui 
velocissimo. 

Completamente compatibile con l’ormai 
noto set di comandi AT HAYES esteso, ri¬ 
spetta fedelmente i comandi impartitigli via 


software con qualsiasi programma di co¬ 
municazione. 

Allo stesso modo è anche facile da usare 
poiché, essendo multistandard, è in grado 
di adattarsi automaticamente alle caratteri¬ 
stiche del modem remoto. 


PROVA PRATICA 

Provata su strada, abbiamo effettuato tutti i 
collegamenti con qualsiasi banca dati sen¬ 
za restrizioni di sorta. 

Correre è bello e a 2400 bit/s, a tarda notte 
quando le persone “normali” dormono, ab¬ 
biamo scorrazzato sulle autostrade della 
telematica. 


CONSIDERAZIONI FINALI 

La scheda modem che abbiamo visionato 
risulta assemblata con ordine ed i compo¬ 
nenti sono di prima qualità. La compatibili¬ 
tà Hayes è completa ed inoltre presenta un 
set a parte di comandi non usuali su altri 
modem, ai quali va aggiunta la possibilità 
di memorizzare su RAM la configurazione 
del tutto. 
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VIDEOTEL 



Un software nato in casa del Prestai, che 
dimostra l’efficacia del sistema Videotex 


MlRROR II 


on il software che prendiamo 
in considerazione viene for¬ 
nito su dischi da 5,25 e 3,5 
pollici, primo chiaro segnale 
di lungimiranza commercia¬ 
le ed il suo utilizzo è previsto sia per portati¬ 
li che per macchine da Desk Top. 

Dal nome del pacchetto, MlRROR (spec¬ 
chio), non si evince immediatamente il suo 
scopo forse perché dopo tante inflazionate 
finestre (WINDOWS), i creatori software 
hanno preferito cambiare look. 
Analizzando i particolari e le caratteristiche 
tecniche si ha la sensazione di trovarci di 
fronte ad un oggetto al di sopra della me¬ 
dia, come confermano le velocità supporta¬ 
te e la videata iniziale del Mirror. 

Appena lanciato si viene avvertiti che se il 
contatore interno cammina troppo veloce¬ 
mente basta attivare un file batch e far par¬ 
tire il tutto. 

Apriamo il sipario 

Si proprio così, si apre un sipario nero su di 
una schermata dal fondo azzurro su cui 


spiccano le scritte in bianco, prendiamo vi¬ 
sione dei parametri di default della porta di 
comunicazione e di connessione in quel 
momento presenti. Nella parte in basso ap¬ 
pare la linea dei comandi dalla quale si ri¬ 
chiamano tutti i parametri da settare. 
Iniziando dal primo, Port, possiamo decide¬ 
re verso quale porta indirizzare i nostri dati, 
di solito si indirizzano sulla Com 2 per la¬ 
sciare una eventuale Com 1 libera per il pi¬ 
lotaggio di altre periferiche seriali. 
Precisiamo che il programma prevede fino 
a 4 porte seriali, come parecchi modem in 
commercio ormai adottano. 

Il secondo, il più importante, è la velocità di 
trasmissione. 

Questa può essere settata su tutti i valori 
possibili da 10 Baud a 19200 ed oltre, mo¬ 
dem permettendo. 

Seguono Data (8 o 7), Parity (Odd, Even, 
None) e lo Stop bits (1,2). 

Nei parametri di connessione invece sono 
presenti le informazioni che riguardano il 
numero da chiamare per il collegamento, il 
nome della banca dati, da caricare coll’ap¬ 
posito comando Load, la sua descrizione 
sommaria. 


Seguono il numero di volte che il computer 
ritenterà la comunicazione in caso di man¬ 
cato collegamento, il modo Half o Full Du¬ 
plex e, se ce n’è bisogno, dell’emulazione di 
terminale. 


EMULAZIONE PRESTEL 


Prendiamo sotto esame l’ultimo parametro, 
quello dell'emulazione di terminale. 

Questo è quello più succoso in quanto ha 
tra gli altri il terminale Prestel, che rende 
possibile non solo il collegamento al servi¬ 
zio pubblico Videotel con modalità grafica 
ma la possibilità di accedere ad un folto 
menu di tasti preconfigurati. 

Si può pertanto scegliere tra due opzioni di 
visualizzazione, una di tipo semigrafico, di¬ 
videndo il video in due, con nella seconda 
parte tutti i tasti con i comandi relativi, o la 
visualizzazione della pagina completamen¬ 
te in grafica Videotex Cept 3. 

Per comandi Videotex intendiamo tutti 
quelli relativi alla memorizzazione della pa- 
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VIDEOTEL 



M I R R 0 R 


II 


1. Port Sett 

ings - 

— 1. Con 

nection Parameters - 

Port 

1 

Loa ded 

STD.XTK 

Speed 

2400 

Name 

Amstrad MC2400 - MI 

Da t a 

0 

Numbe r 


Parit y 

None 

Mode 

Cali 

Stop bits 

1 

Duplex 

Full 



Rdia 1 s 

0 

Handshaking 

On 

Capture 

Off (SOK Remaining) 

Flow control 

'S/-Q 

Emù late 

None 


Off-line 


Command File Directory 


D 

A C 0 R N _B B 

2) 

ALEXJDPU 

3) 

ANS232 

4) 

ANSMODEM 

5) 

CALLHOME 

6) 

FILETRAN 

7) 

GENIE 

8) 

HELP 

9) 

MCI 


10) 

MICRONE T 

1 1 ) 

RBBS 

12) 

SOFTKLON 

13) 

STD 

14) 

TELEGOLD 

15) 

VIDEOTEL 

16) 

VID _M 0 N 0 










Go 

to diai 


CTRL-End 

t o 

scro11 

left box 

Help 

f or 

command li 

Bye 

to hang 

up | 

CTRL-PgDn 

t o 

scro11 

right box 

Qui t 

t o 

exit MIRROR 

Enter file 

number 

C 1 - 16 ) : 









NAME 

NUMBER 

VIDEOTEL 
atdp,,16,S 

CPROGRESS 31 6| --7| 8| -- 

SPEED 

1200 

TABEXPAND Off 

DATA_BITS 

7 

UC 

ONLY 

Off 

PARITY 

Even 

BACKGRND S 

ST0P_BITS 

1 

FK 

FI 

. ? , » 

ANSWBACK 

Off 

FK 

F 2 

"@li|" 

APREFIX 

ATS0=1| 

FK 

F 3 

"@di /s|" 

ATTEN 

Esc 

FK 

F 4 

"MIRROR" 

BREAK 

End 

FK 

F5 

"@ca /|" 

DEBUG 

Off 

FK 

F 6 

"@pr /|" 

DPREFIX 

ATV0X1B23I'ATDP 

FK 

F7 

"etyl" 

"@ca <24|" 

DSUFFIX 

1 

FK 

F8 

EMULATE 

"PRESTEL " 

FK 

F9 

"@sn|" 

EPATH 

" " 

FK 

FIO 

"@sn x |" 

SYSPATH 

\MIRR0R\ 

FK 

SI 

».. 

FILTER 

-++++-++- 

FK 

S2 

.... 

PORT 

2 

FK 

S3 

.... 

PWORD 

" '* 

FK 

S4 

.... 

MINIT 

• M 

FK 

S5 

"Welcome to Miri 

RDIAL 

0 

FK 

S6 

.... 

SWITCH 

Home 

FK 

S7 

.... 

TIMER 

On 

FK 

S8 

.... 

CRC 

On 

FK 

S9 

.... 

TURNARND 

"_1*00_" 

FK 

SIO 

.... 

ACCEPT 

Everything 

FK 

CI 

"618 1111" 

CWAIT 

Echo 

FK 

C2 

"021 " 

DNAMES 

200 

FK 

C3 

.... 

INFILTER 

On 

• FK 

C4 

.... 

LFAUTO 

Off 

FK 

CS 

"@@c4@c3@c2@c1" 

LWAIT 

Quiet 40 

FK 

C6 

.... 

MODE 

Cali 

FK 

C7 


BKSIZE 

1 

FK 

C8 

.... 

BLANKEX 

Off 

FK 

C9 


CAPTURE 

Size 50 

FK 

CIO 

"start" 

CAPTURE 

Off 

FK 

Al 

.... 

COMMAND 

ETX 

FK 

A2 

..., 

VIDEO 

CGA /fs 

FK 

A3 


SCREEN 

N wb 

FK 

A4 

.... 

SCREEN 

H Wb 

FK 

A5 

» " 

SCREEN 

L w- 

FK 

A6 

.... 

DUPLEX 

Full 

FK 

A7 

.... 

FLOW 

~ S/ ‘ Q 

FK 

A8 

.... 

HANDSHAKE 

On 

FK 

A9 

.. « 

OUTFILTER 

On 

FK 

AIO 

,... 

PMODE 

2 

GO 

q45/45 

PRINTER 

Off 





Gl 


gina, il telesoftware, ecc. che sono neces¬ 
sari per una consultazione più che intelli¬ 
gente del servizio Videotel. 

Continuando la carrellata dei parametri di 
connessione precisiamo che i file conte¬ 
nenti i suddetti dati, una volta salvati su di¬ 
sco, hanno come suffisso l’estensione 
XTK, come nel più noto pacchetto XTALK, 
“...mater semper certa est...”, per cui se si 
proviene da tale ambiente non si butta via 
nulla. 

In quel file vengono scritti tutti i parametri 
che servono al collegamento ed inoltre le 
informazioni per una eventuale password, 
la possibilità di ripetere il numero, il ritardo 
ecc. 

Ma la compatibilità con altri pacchetti o 
standard non si ferma qui. Nel modo di tra¬ 
smissione di un programma, in gergo 
UpLoad, DownLoad o Telesoftware per ri¬ 
manere in ambiente Videotex, oltre ai clas¬ 
sici protocolli Ascii, Kermit, X e Y Modem, ci 
sono i due di XHayes e XTalk.. 

Non ci perdiamo nei meandri della moltitu¬ 
dine dei comandi attivabili nella parte sud¬ 
detta, in quanto creeremmo solo confusio¬ 
ne in chi non è addentro alla programma¬ 
zione Hayes compatibile, e aggiungiamo 
che il manuale è ampio ed esauriente 
quando si rivolge a quell’utenza smaliziata 
e non pigra come noi che ci accontentia¬ 
mo di mandare tutto in automatico. 
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VIDEOTEL 


CONCLUSIONI 

Che dire di altro se non “Specchio spec¬ 
chio delle mie brame... qual è il software più 


bello del reame?”. 

Scherziamo, ma questo pacchetto è vera¬ 
mente fatto bene, completo, pratico e per 
dirla all’inglese “user friendly”. 


Proprio a trovargli un neo, non ha la possi¬ 
bilità di visualizzare grafica Cept profilo 1, 
BTX per intenderci, ma non si può preten¬ 
dere tutto in una sola volta. 


Name 

Amstrad 

MC2400 - MIRROR 

Default Settings 


Number 






Loaded 

STD.XTK 





Mode 

Cali 

Handshaking 

On 

Dr i ve 

C: 

Rdia 1 s 

0 

F1ow con t ro1 

~S/*Q 

Cdir 

\MIRROR 

Duplex 

Full 

Debug 

Off 

Sy s pa t h 

\MIRROR\ 

Fort 

1 

Lfa u t o 

Off 

Epa t h 


Speed 

24D0 

Emù 1a t e 

None 



Da t a 

Q 

Cap t ure 

Off (50K Remaining) 


Pari t y 

None 

Printer 

Off 



Stop bits 

1 







Pword 


At t en tion 

Esc 

InfiIter 

On 

Acce p t 

E ve ry t hing 

Swit eh 

Home 

Video 

CGA /fs 

Answerback 

Off 

Command 

ETX (*C) 





Break 

End 

Lwai t 

None 

Ore 

On 

Lb rea k 

300 

Cwai t 

None 

Bksize 

1 

Background 

Shift-Shift 

T urnaround 

" M 





Blank expand 

Off 

Mini t 




Tab expand 

Off 

Dprefix 

ATZ| *ATVOX1I 

~ ATDP 


Outfi1 ter 

On 

D s uffix 

1 



Uc-on1y 

Off 

Aprefix 

ATS0=1| 



Lwait Set 

" M 

Cprogre s s 

3] 6 | -~?| 81 -- 

1 1 91 51 1 0- 

-"G| 

Press RETURN 

to continue... 





V I 

D E 

0 T E L 

900 1 a 

0 



Prestel 

Emù 1 a tion 



• 

... 




VI 

. 0 






Al t-A 

= 

Auto-save ON/OFF/DYNAMIC 






Al t-W 

=5 

Wri t e 

page to capture file 






Al t-G 


Graphics display mode 






Al t-T 

= 

Text display mode 


Al t-R 

= 

Re vea1 

concealed data 



Servizio 

BISTANDARD 


Al t-C 


Change 

col or palette 

5 



Al t-Y 


Monochrome graphics ON/OFF 





J 

Al t-S 

— 

Take snapshot of text 



Satellite Roma 1 


Alt-M 


Re-dis 

play this menu 



s sS 



Al t-D 

= 

E nab 1 e 

/Disable Telesoftware 





Al t-L 

- 

End of 

line CR or CR/LF 






Auto 

- 

save 

i s OFF 






Tele 

s 

of t ware 

is ENABLED 






End 

of line 

is CR/LF 






Monochrome 

is OFF 






Note: Capture must be on for autorsave 






or write 

page to function. 

E s_c 

f or 

Command? , 

Home for Status 

! 

Capture Off 

Pre s t e 1 
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Presentiamo un nuovo tipo di servizio che 
si presta a rendere più accessibili le noti¬ 
zie di agenzia al vasto pubblico 


utti ricordiamo certamente o 
almeno immaginiamo una 
sala stampa che si rispetti, 
rumorosa di telescriventi in 
perenne lavoro. 

Ora con l’avvento dell’elettronica e il conti¬ 
nuo divenire della carta in mezzi più “bio¬ 
degradabili” come le schermate dei termi¬ 
nali telematici, salvando dalla distruzione i 
polmoni della terra, l’accesso a questa ma¬ 
rea di informazioni diventa sempre più faci¬ 
le. 

La sete di sapere, a mano a mano diventa 
sempre più richiesta di informazioni spic¬ 
ciole e "svelte”, tanto da far predire da 
qualche futurologo l’avvento di una nuova 
società dove l’informazione diverrà merce 
di scambio. 

Ma, indipendentemente dalla fiducia da noi 
riposta in questi profeti del 2000, non pos¬ 
siamo ignorare quale grande opportunità 
ci viene offerta da questo servizio. 

È il momento, infatti, di sentirci cittadini eu¬ 


ropei a tutti gli effetti e la possibilità di sfo¬ 
gliare in pochi secondi le pagine di un gior¬ 
nale che tratta alla stessa stregua, e dando 
lo stesso identico risalto, a notizie nazionali 
ed estere. 

INDICE SERVIZI IN 
TRASMISSIONE 

1. “Oggi in evidenza” - Notiziari 

2. Editoria e Comunicazione 

3. Servizio di informazione europea 

4. Servizio culturale (Iniziative per i giovani) 

5. Servizi disponibili a richiesta 

N.B.- le informazioni sono a pagamento (li¬ 
re 300 ogni pagina) - stralci richiesti gratuiti. 

“OGGI IN EVIDENZA ” - 
NOTIZIARI 

Tutto il servizio riassume le principali notizie 
delle 24 ore trasmesse sulla rete telegrafica. 
Segue le attività politico-istituzionali con ri¬ 
guardo al Parlamento e alle Regioni. I testi 
in trasmissione telegrafica possono essere 
richiesti alla segreteria della agenzia. 

In particolare OGGI IN TRASMISSIONE, ri¬ 
portava al momento in cui scrivevamo l’arti¬ 
colo, un giudizio poco lusinghiero sulla tra¬ 
smissione “Il Gatto” di “Canale 5. 


Gli altri proseguono sulla stessa linea ripor¬ 
tando notize varie e molto interessanti sui 
vari panorami offerti. 

Volendo però i testi possono essere richiesti 
e saranno inviati gratuitamente per via po¬ 
stale, o via telefax. 


IN ALLESTIMENTO 

Tra i servizi in allestimento troviamo una ri¬ 
cerca sulla struttura regionale dell’informa¬ 
zione (quotidiani, agenzie di stampa, perio¬ 
dici regionali) e una banca dati per il setto¬ 
re Europeo. 

Queste note provengono a cura della reda¬ 
zione di Parigi e sono pervenute nel perio¬ 
do gennaio-marzo 1989. Da notare che so¬ 
no state già divise per mese: 

1. - Sommario degli argomenti di gennaio 

2. - Sommario degli argomenti di febbraio 

3. - Sommario degli argomenti di marzo e 
che la consultazione alla pagina 6025 è 
gratuita. 

ROMA INFORMAZIONI 
AGENZIA DI STAMPA 
Direttore resp. Matteo G. Tocco 
Redazione: Via del Tritone 61 
00100 Roma Tel.(06) 6794394-6786961 
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VIDEOTEL 


BORSA AUTO 



La carta patinata ha sempre il suo fascino, 
e riviste come Quattroruote o altre del set¬ 
tore automobilistico non devono vedere 
nel “grande fratello ” un rivale, semmai un 
compagno, ora che cominciano a nascere 
servizi per le quotazioni dell’usato per 
l r auto e per altri campi 


IDEOTEL, lo abbiamo ripetu¬ 
to più volte è quel servizio 
pubblico, che dovrebbe do¬ 
po vari decolli più o meno 
riusciti, permettere all’utenza 
media italiana un colloquio interattivo e 
una consultazione di banche dati per ac¬ 
quisire informazioni ed operare transazioni. 
Nella sua peculiarità di essere distribuito at¬ 
traverso la rete telefonica commutata e di 


essere accedibile da tutta Italia, componen¬ 
do un numero “quasi verde” il 165, risiede 
la sua potenzialità, più che nei migliora¬ 
menti tecnici che permetteranno la compa¬ 
tibilità Télétel e Ascii. 

Ora la rete copre attualmente oltre il 70% 
dell’utenza telefonica nazionale, mentre si 
prevede per l’89 la copertura di circa l’85%, 
contando a fine ’88 su circa 35.000 utenti. È 
a questi utenti che hanno sete di informa¬ 
zioni vere, che si rivolgono servizi quali Car 
Video Car o Publitel (ndr ritiro di sistemi di 
elaborazione usati). 


CARVIDEOCAR 

Grande servizio, grandi proposte. 

Per chi vuole acquistare o vendere un auto¬ 
veicolo, oggi, grazie a LA BORSA DELL’AU¬ 
TO, c’è un importante punto d’incontro. 
Infatti, attraverso la Banca Dati CAR VI- 
DEOCAR, si può usufruire di un servizio in¬ 


novativo e di alta qualità, quello telematico. 
I vantaggi del sistema in rapporto ad altri si¬ 
stemi di informazione sono molteplici. 

La domanda o l'offerta vengono irradiate 
istantaneamente, le inserzioni vengono im¬ 
messe in un circuito che copre l’intero terri¬ 
torio nazionale e, forse più importante di 
ogni altra cosa, all’utenza si apre un gran¬ 
de mercato di domanda/offerta, con una 
conseguente possibilità di confronto, sele¬ 
zione a scelta. 

Non dimentichiamo certo la sicurezza della 
trattativa. 

Infatti il sistema telematico dà la possibilità, 
attraverso stampante, di concludere a di¬ 
stanza un contratto in modo concreto e si¬ 
curo. 

Un listino, come quello di Borsa deve essere 
aggiornato costantemente ed è appunto 
quello che avviene quotidianamente per 
tutte le Case Automobilistiche italiane ed 
estere, grazie alla collaborazione riservata 
a LA BORSA DELL’AUTO dalle Case co¬ 
struttrici e dalle società importatrici. 
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VIDEOTEL 



Questo per quanto riguarda il mercato del 
nuovo mentre per quel che riguarda le quo¬ 
tazioni dell’usato, esso viene aggiornato 
costantemente attraverso dati di mercato 
trasmessi in tempo reale. 

I dati relativi agli ultimi sei anni si riferiscono 
a tutti i modelli di autovetture, fuoristrada, 
veicoli commerciali e industriali. 

Una banca dati di grande importanza resa 
possibile dalla collaborazione instaurata 
fra LA BORSA DELL’AUTO e gli operatori 
addetti al settore. 

Marsfin srl 

Via Cabassi 10/a 

tei. 059/2162-331256-331181 

fax 059/337206 

PUBLITEl 

Apre a pagina *67812# il servizio “Ritiro ela¬ 
boratori usati’’ con relative quotazioni in 
costante aggiornamento. 

L’inarrestabile crescita dell’automazione e 
meccanizzazione aziendale ha prodotto, in 
questi ultimi anni, una discreta richiesta di 
sistemi gli elaboratori più complessi dei per¬ 


sonal computer usati, sia da parte di ditte, 
sia da parte di numerose case di manuten¬ 
zione presenti nel territorio nazionale. 

La società di brokeraggio BREL per l’ap¬ 
punto, si fa carico del ritiro delle macchine 
usate e della loro rivendita; e come per il 
nuovo, la stragrande maggioranza di siste¬ 
mi trattati sono di marca IBM. 

Facciamo notare che le quotazioni migliori 
sono ottenute da tutti i modelli del sistema 
36, PC, Compact, Base, ed anche dai primi 
esemplari usati di Entry. 

Di difficile smercio il sistema 38, più grande 
del precedente, che mantiene un certo va¬ 
lore o per gli hard-disk da 200-400Mb, o nei 
modelli più grandi e recenti, 18,20,40,600 e 
700, ormai destinati solamente al mercato 
della ricambistica d’occasione i più vecchi 
sistema 34 e Serie 1. 

Naturalmente anche all’interno del sistema 
36 esistono modelli più o meno richiesti ed 
altri più o meno reperibili. Su tutto questo 
mercato la BREL offre un servizio gratuito, 
tramite Videotel, di aggiornamento quota¬ 
zioni con cadenza regolare ogni venti gior¬ 
ni. Infatti l’evoluzione del mercato dell’hard- 
ware usato soprattutto per quanto concer¬ 


ne le Unità centrali di elaborazione è molto 
veloce. 

Diverso, e più stabile, è il settore della termi¬ 
naleria (video-stampanti ecc.); anche di 
questo è offerta ai possessori di materiale 
IBM una quotazione continuamente ag¬ 
giornata. 

Prima di passare alle cifre è importante sa¬ 
pere che, contattando la BREL, si possono 
ottenere quotazioni e ritiri anche di elabo¬ 
ratori Olivetti-Honeywell-Philips ed altri. 
Un’avvertenza da non scordare mai: le 
quotazioni s’intendono orientativamente 
valide per macchine disponibili entro una 
ventina di giorni e non di più; in caso di ven¬ 
dita all’utente finale, il prezzo aumenta ine¬ 
vitabilmente, in conseguenza di costi di tra¬ 
sporto, magazzinaggio e rimessa in ordine, 
nonché per il margine della società broker. 
La BREL, oltre che per quotazioni di ritiro 
da tutta Italia, è sempre a disposizione tele¬ 
fonicamente, via fax o Videotel, anche per 
informazioni circa il prezzo ad utente finale. 

BREL 

Genova - C.so A. Podestà 9 B 
telefax 010 - 532059 
tei. 543392 - 532896 
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DRA/DDRA-1 A7C0 
DRB/DDRB-1 A7C1 
CRA-2 A7CE 
CRB-2 A7CF 
DRA/DDA-2 A7CC 
DRB/DDRB-2 A7CD 


GESTIONE 
PIA 6821 

di PAOLO FREQUENTI 

I PC 128 utilizza per alcune funzioni interne due inte¬ 
grati Motorola 6821 PIA (Peripheral Interface Adap- 
ter). Questi sono degli adattatori programmabili mol¬ 
to versatili la cui conoscenza permette un utilizzo più 
avanzato della macchina. Ogni 6821 dispone di 4 in¬ 
dirizzi di memoria che permettono, in funzione dei bit settati e non, 
di stabilire le modalità operative. Le PIA sono fisicamente divise in 
due parti uguali, la prima associata ad un registro chiamato “A” 
mentre la seconda al registro H B\ Il programmatore può stabilire 
quali di queste parti sarà dedicata all’INPUT e quale all’OllTPUT 
oppure destinarle entrambe alla stessa funzione (INPUT o OUT¬ 
PUT). I registri delle PIA sono: 

Control Register (Registro di controllo): fissa le modalità di funzio¬ 
namento di una parte della PIA. 

Data Register (Registro Dati): permette l’invio di un codice (OUT¬ 
PUT) o una lettura da una unità esterna (INPUT). 

Data Direction Reg. (Registro di direzione): stabilisce quali linee di 
dati in una parte della PIA sono destinati all’INPUT e quali all’OUT- 
PUT. 

È ovvio che i suddetti registri esistono per la parte A e per la parte B, 
quindi avremo: 

ÓRA Control Register A 
CRB Control Register B 
DRA Data Register A 
DRB Data Register B 
DDRA Data Direction Register A 
DDRB Data Direction Register B 

Sul PC 128, essendoci 2 PIA, ci saranno 8 indirizzi di memoria utiliz¬ 
zati: 4 CR; 4 DR/DDR. Va inoltre precisato che i DR e DDR occupano 
lo stesso byte di memoria e vengono selezionati in funzione di un 
bit del CR. Le locazioni di memoria del PC 128 rappresentanti i vari 
registri sono: 



Registro Locazione 


CRA-1 A7C2 
CRB-1 A7C3 


Passiamo all’analisi del CR. Nella tabella seguente vengono ripor¬ 
tati i significati di tutti i bit. 

Bit 7 - bit di stato - viene settato tramite una transizione sulla linea 
di controllo 1 e cancellato dopo una lettura del DR. 

Bit 6 - stessa funzione del bit 0 ma per la linea di controllo 2. 

Bit 5 - determina se la linea 2 è un INPUT (0) o OUTPUT (1). 

Bit 4 - controllo della linea 2: se è un INPUT determina se il bit 6 è 
settato da una transizione alto-basso (0) o basso-alto (1) sulla li¬ 
nea 2; se è un output determina quando la linea 2 è impulsiva (0) o 
è un livello (1). 

Bit 3 - controllo della linea 2: se è un INPUT attiva un interrupt di 
uscita dal bit 6 (1). Se è un OUTPUT determina le condizioni di fine 
per un impulso (0 = prossima transizione sulla linea di controllo 1; 

I =al termine di ogni ciclo del clock) 

Bit 2 - seleziona il DDR (0) o il DR (1). 

Bit 1 - determina quando il bit 7 è settato tramite una transizione al¬ 
to-basso (0) o basso-alto (1) sulla linea di controllo 1. 

Bit 0 - se vale 1, attiva l’interrupt di uscita dal bit 7 del CR. 

Le linee di controllo permettono di stabilire le modalità di funziona¬ 
mento degli interrupts tra PIA e CPU. Nella tabella sottostante viene 
riportata la costituzione del CR in modo abbreviato: 

[7] [6] [5 4 3] [2] [1 0] 

CRA-IRQA1 # IRQA2 # CA2 control # DDRA on # CAI control 

[7] [6] [5 4 3] [2] [1 0] 

CRB-IRQB1 # IRQB2 # CB2 control # DDRB on # CB1 control 

Per finire, il DDR permette di stabilire quali linee dei registri A e B sa¬ 
ranno in INPUT e OUTPUT, e più precisamente se un bit vale 0 la 
corrispettiva linea sarà in INPUT, altrimenti, se vale 1 sarà in OUT¬ 
PUT. 

Dopo questa breve introduzione, passiamo ad analizzare la funzio¬ 
ne della PIA nel nostro PC 128 che, come vedrete risulterà molto più 
semplice. 

La locazione A7C0 è una delle più importanti locazioni di sistema. 
Tramite questa è possibile commutare la ROM e la RAM video, non¬ 
ché leggere il registratore ed emettere dei suoni. 

Vediamo più dettagliatamente la funzione di ciascun bit: 
b7 b6 b5 b4 b3 b2 bl bO 
Tp Rom Shf Sou Ram 
IN OUT OUT OUT IN OUT IN OUT 

II bit 7 riporta la transizione rilevata dal convertitore analogico-digi- 
tale (A/D) della testina del registratore. In altre parole, quando il li¬ 
vello di tensione rilevato dalla testina supera un determinato valo¬ 
re, questo bit cambia di stato. Non è possibile variare il valore di 
questo bit mediante una scrittura nella locazione in quanto è ne¬ 
cessario effettuare una lettura di questa. 

Il bit 5 permette la commutazione della ROM del BASIC 128 e del BA¬ 
SIC 1. Quando vale 1 viene selezionata la ROM del BASIC 128 (tasto 
1 all’accensione) mentre se vale 0 la ROM sarà quella del BASIC 1 
(tasto 2 all’accensione). È ovvio che quando ci si trova in un basic, 
non è possibile effettuare la commutazione della ROM, che com- 
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porta il ritorno con errore (in basic 128 viene comunicato il messag¬ 
gio “Out of memory”). 

Il bit 4 permette di variare lo stato del tasto SHIFT LOCK. Se vale 1 la 
lucetta rossa su detto tasto sarà attiva e di conseguenza saranno 
fisse le maiuscole, mentre se vale 0 detta luce sarà disattivata e le 
maiuscole saranno sbloccate. È possibile variare lo stato di questo 
bit per fissare o sbloccare le maiuscole da programma: 

POKE &HA7C0,PEEK(&HA7C0) OR 16 

POKE &HA7C0,PEEK(&HA7C0) AND 239 

la prima fissa le maiuscole mentre la seconda le sblocca. 

Il bit 2 permette l’emissione di suoni. Variando lo stato di questo bit 
si ottiene, ad ogni variazione, l’emissione di una onda quadra di 
elevata frequenza che, opportunamente ripetuta permette di otte¬ 
nere molteplici effetti sonori. 

I migliori di questi effetti si ottengono in linguaggio macchina per¬ 
ché la velocità di commutazione è molto più elevata. La commuta¬ 
zione in linguaggio macchina si ottiene molto semplicemente con 
le seguenti istruzioni: 


LDA $A7C0 
EORA #4 
STA $A7C0 
mentre in basic: 

POKE &HA7C0,PEEK(&HA7C0) XOR 4 

Il bit 0, come ormai tutti sapranno, permette la commutazione dei 
due banchi di RAM del video. 

L’uso del bit 5 può essere effettuato soltanto in linguaggio macchi¬ 
na. 

La locazione A7C1 è composta in modo più semplice: i bit da bit7 a 
bitl servono per la lettura della tastiera, come già detto in passato, 
mentre il bit 0 svolge la stessa funzione del bit2 della locazione 
A7C0. 

La locazione A7C2 e A7C3 sono due CR i cui valori non devono es¬ 
sere assolutamente variati, in special modo il bit di accesso al DDR. 
bit 2, in quanto si può causare il blocco del sistema. 

In ultima analisi, la seconda PIA, facendo capo agli indirizzi da 
A7CC a A7CF permette la lettura del joystick e l’analisi più appro¬ 
fondita è già stata effettuata in passato. Un utilizzo della seconda 
PIA al quale sto lavorando consiste nella connessione ai connettori 
di joystick di apparati elettronici vari, tra cui un convertitore AD e 
DA, che sopperirà alle carenze del programma SOUND SAMPLER 
permettendo il campionamento di suoni con ottima fedeltà, nonché 
un modem, interfaccia per il controllo di elettrodomestici, converti¬ 
tori per utilizzare il computer come strumento di misura (oscillosco¬ 
pio) e apparati simili. 


UN NEW 


di PAOLO FREQUENTI 

Come leggere un programma registrato con modalità di protezio¬ 
ne e poterlo quindi salvare o modificare . Ne suggeriamo il modo 


ermette la lettura di programmi registrati con la mo¬ 
dalità di protezione. La routine in L.M. è molto breve 
ed occupa la zona di memoria da &H5FCD a 
&H5FFF. È quindi necessario, prima di caricarla, ef¬ 
fettuare un CLEAR„,&H5FCC. Prima di lanciare la 
routine bisogna effettuare le seguenti operazioni: 

- Caricare il programma BASIC protetto 

- Dare il comando NEW 

- Dare il comando CLEAR„„&H5FCC 

- Caricare la routine 

- Dare il comando BANK 1 

- Dare EXEC &H5FCD 

Dopo questa serie di operazioni il programma in BASIC sarà 
totalmente sprotetto e quindi salvabile e modificabile. 


IO ULo;CLEAR,,,&H5FCC 

20 ST=&H5FCD;LIN-100 

21 CK-0 

22 READ AS.A:IF A$=”*” THEN 80 
24 FOR B-1 IO LEN(.A$)-1 STEF 2 

26 L-VAL <”&H” + MIDS <AS>, B, 2) ) : FOKEST, L 
28 CK-CK+L 
30 ST-ST+1 
40 NEXT B 

42 IF CKO A THEN FRINT”ERRORE NELLA LIN 
EA ”LIN;END 

44 LOCATEO, 0,0:FRI NT”LINEA ”LIN” OK ” 

50 LIN=LIN+2:GOTO 21 
80 CLS;FRINT”SALVATAGGIO ?” 

82 AS= INPUTS (. 1) : IF A$=”S” OR A$^”s” THEN 
SAVEM”UNNEW”,&H5FCD,&H5FFF,&H5FCD 

83 END 

100 DATA8602B75FF78E6004,0903 
102 DATA20097C5FF78C6110,0760 
104 DATA2BF6396D00270430,0546 
106 DATA0120EF6D01270220,0455 
108 DATAF6B65FF78B02B760,1190 
110 DATA0239000G00000000,0059 
112 DATA 0 0 0 0 0 0 FFFF 0 0 0 0 FF, 0765 
114 DATA *,0 
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PER SAPERNE DI PIU’ 


DT READ 


di PAOLO FREQUENTI 

Con la pubblicazione di DT READ diamo la possibilità di leggere i 


Linea 50: 

modificare LIN = LIN + x con l'incremento esistente tra le linee ge 
nerate da DATAGEN. 


programmi BASIC creati con DATAGEN 


I programma DTREAD permette di effettuare la lettu¬ 
ra dei programmi BASIC generati da DATAGEN 
(pubblicato sul numero di gennaio) con l'effetto di 
depositare in memoria i dati contenuti in detti pro¬ 
grammi. Le modifiche da apportare al listato base 
sono elencate qui di seguito. 

Linea 10: 

modificare il comando CLEAR con un valore pari alla partenza del¬ 
la routine diminuito di 1. Se la routine è compresa tra &H6000 e 
&H9FFF il comando sarà CLEAR,START-1 mentre se è compresa 
tra &H2000 e &H5FFF il comando sarà CLEAR,„START-1. 

Linea 20: 

modificare ST con l’indirizzo di partenza della routine e LIN con il 
numero della prima linea generata da DATAGEN. 



Una volta effettuate le modifiche si deve salvare il programma con 
SAVE"CASS:PROG". Si carica quindi il programma precedente- 
mente registrato generato da DATAGEN e si ricarica DTREAD con 
CHAIN‘‘PROG’’. Il programma va così in AUTOSTART (CTRL + C 
per interrompere). È importante che le linee del programma gene¬ 
rato con DATAGEN comincino con il numero 100 o superiore, per 
evitare che si sovrappongano a DTREAD. IMPORTANTE: è neces¬ 
sario aggiungere una linea DATA a quelle generate da DATAGEN 
avente il contenuto: 
n. DATA *,0 

Il numero di questa ultima linea deve essere pari al numero della ul¬ 
tima linea DATA incrementato dello STEP presente tra due linee. 
Esempio: se le linee sono numerate 100,102,104 lo step sarà 2; se 
l’ultima linea DATA ha il numero 200 la linea DATA *,0 avrà numero 
202 . 

Eseguendo il programma vengono comunicate le linee esatte ed 
eventuali errori. Una volta terminata la lettura ed il deposito dei dati 
in memoria, il programma passa alla linea 80, non definita, dove è 
possibile inserire vari comandi, tra i quali quelli di registrazione del¬ 
la routine generata in memoria. 


IO 

CLS;CLEAR,&H9EFF 

20 

ST-&H9F00 s L. I N=* 1 DO 

21 

CK=0 

.r.\. X. 

READ A*-, A: IF THEM 80 

24 

POR B~1 TO LEN(A*>“1 STEP 2 

26 

L-VAL("&H"+MIDT(AT,B,2))sPOKEST,L 

28 

CK-CK+L 

30 

ST"ST +1 

40 

NEXT B 

42 

IF CKOA THEN FRI NT "ERRORE NELLA L 

INEA "LIN;END 

44 

LOCATEO, 0,0 s PRI NT ” L I NE A " LIN " OK ’ ! 

50 

L.IN-L.IN+-2: GOTO 21 
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PER SAPERNE DI PIU’ 


di MAURO MARINILLI 

hiunque di voi programmi in BASIC, utilizzando co¬ 
me memoria di massa un registratore a nastro, sa¬ 
prà quanto lento e inefficace sia il comando SA- 
VE“CAS:”, che salva file in ASCII. Purtroppo è l’unico 
modo concessoci dal BASIC 1.0 dell’MSX per salvare 
listati e farli partire automaticamente. 

Con questa breve subroutine in linguaggio macchina, sarà possi¬ 
bile caricare e far partire automaticamente i nostri programmi, me¬ 
morizzati con la specifica (e molto più flessibile) istruzione CSAVE. 
Praticamente, invece di caricare il vostro programma con CLOAD 
per poi digitare F5/RUN, dovrete ora fornire il comando BLOAD 
“CAS:”,R come se si trattasse di un programma commerciale. Il 
computer caricherà da solo il programma che segue e, a carica¬ 
mento avvenuto, provvederà automaticamente a dare il RUN, sen¬ 
za alcuna ulteriore operazione da parte vostra. La tecnica utilizza¬ 
ta è quella di inserire i codici dei comandi CLOAD + RETURN e RUN 
+ RETURN, nel buffer di tastiera. Con una piccola modifica potrete 


A UTOEXEC 

cambiare le parole chiave, o aggiungerne altre a vostro piacimen¬ 
to. Per utilizzare la routine che vi forniamo seguite questo procedi¬ 
mento: dopo aver digitato il listato in modo corretto (i checksum si 
riferiscono alla locazione di memoria, non alla somma complessiva 
dei singoli termini), salvatelo su periferica prima di lanciarlo. Un er¬ 
rore in linguaggio macchina, infatti, non perdona quasi mai: potre¬ 
ste perdere tutto ciò che avete digitato. 

A questo punto posizionate nel registratore un nuovo nastro e lan¬ 
ciate il programma. Verrà così memorizzato il programma in lin¬ 
guaggio macchina. Ora caricate il “vostro” programma con un 
CLOAD e salvatelo con CSAVE, proprio di seguito a quello in lin¬ 
guaggio macchina. Per verificare il buon funzionamento, riavvol¬ 
gete il nastro e digitate BLOAD“CAS:’’,R. Praticamente questo pic¬ 
colo listato riesce a fondere assieme la velocità del comando 
CLOAD con l’opzione “R” possibile solo con i comandi per il tratta¬ 
mento di file ASCII. Vi consigliamo, per completare l’opera, di disa¬ 
bilitare l’uso del CTRL 4- STOP, con la POKE che ormai conoscere¬ 
te tutti: in questo modo renderete davvero “inattaccabile” il vostro 
programma BASIC. 




io ’ ######################### 

20 ’ 

30 ’ SCRITTO DA 

40 ’ 

50 ’ MAURO MARINILLI (1989) 

60 * 

70 • ######################### 

10000 FORI-60416!T060469!:READU:POKEI,U: 
NEXT : 

10002 BSAVE"cas;",60416! ,60470! 

10018 ’ 

10020 'QUESTA LINEA SALVA SU NASTRO 
10022 'SOTTO FORMA DI FILE "BLOAD” 

10024 'QUESTA ROUTINE IN ASSEMBLER. 

10026 'METTILA PRIMA DEL PROGRAMMA IN 
10028 'BASIC CHE VUOI RENDERE 
10030 ' AUTOPARTENTE. 

10032 ’ 

60000 DATA33,240,251,34,250,243,33,250,2 
51,34,248,243,1,10,0,17:’ 60432 
60002 DATA240,251,33,43,236,237, 176,201, 
0,0,0,0,0,0,0,0:’ 60448 

60004 DATAO, 0,0, 0,0, 0,0, 0,0, 0,0,67,76, 79 

,65,68:’ 60464 

60006 DATA13,82,85,78,13,0 
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MSX 


Viaggio Nei 
Mondo 
Dei Token 


129 

END 

130 

FOR 

131 

NEXT 

132 

DATA 

133 

INPUT 

134 

DIM 

135 

READ 

136 

LET 

137 

GOTO 

138 

RUN 

139 

IF 

140 

RESTORE 

141 

GOSUB 

142 

RETURN 

143 

REM 

144 

STOP 

145 

PRINT 

146 

CLEAR 

14? 

LIST 

148 

NEW 

149 

ON 

150 

WAIT 

151 

DEF 

152 

POKE 

153 

CONT 

154 

CSA VE 

155 

CLOAD 

156 

OUT 

15? 

LPRINT 

158 

LLIST 

159 

CLS 

160 

WIDTH 

161 

ELSE 

162 

TRON 

163 

TROFF 

164 

SWAP 

165 

ERASE 

166 

ERROR 

167 

RÉSUMÉ 

168 

DELETE 

169 

AUTO 

170 

RENUM 

171 

DEFSTR 

172 

DEFINT 

173 

DEFSGN 

174 

DEFDBL 

175 

LINE 

176 

OPEN 

177 

FIELD 

178 

GET 

179 

PUT 

180 

CLOSE 

181 

LOAD 

182 

MERGE 

103 

FILES 

184 

LSET 

185 

RSET 

186 

SAVE 

18? 

LFILES 

188 

CIRCLE 

189 

COLOR 

190 

DRAW 

191 

PAINT 

192 

BEEP 

193 

PLAY 

194 

PSET 

195 

PRESET 

196 

SOUND 

19? 

SCREEN 

198 

VPOKE 

199 

SPRITE 

200 

VDP 

201 

BASE 

202 

CALL 

203 

TIME 

204 

KEY 

205 

MAX 

206 

MOTOR 

207 

BLOAD 

208 

BSAVE 

209 

DSKD$ 

210 

SET 

21 1 

NAME 

212 

KILL 

213 

IPL 

214 

COPY 

215 

CMD" 

216 

LOCATE 

217 

TO 

218 

THEN 

219 

T AB( 

220 

STBP 

221 

USR 

222 

FN 

223 

SPCC 

224 

NOT 

225 

ERL 

226 

ERR 

227 

STRINCS 

228 

USING 

229 

INSTR 

230 

' C REM) 

231 

VARPTR 

232 

CSRLIN 

233 

AT TR$ 

234 

DSKI $ 

235 

OFF 

236 

INKEY$ 

237 

POINT 

238 

> 

239 

-- 

240 

< 

241 

+ 

242 

- 

243 

-s 

244 

/ 

245 

* 

246 

AND 

24? 

OR 

248 

XOR 

249 

EQV 

250 

IMP 

251 

MOD 

252 

255 

\ 

STICK 

253 


254 

• • ♦ 


di MAURO MARINILLI 


jv i siete mai chiesti cosa siano i TOKEN? Una parola 
à K che avrete senz’altro letto in tantissimi articoli di pro- 
| grammazione. 

wtmmm Ebbene, quando digitiamo un listato BASIC, il siste- 

ma operativo memorizza le parole chiave del lin¬ 
guaggio sotto forma di numeri: ad ogni parola corrisponde un nu¬ 
mero preciso, ed i valori di questi sono memorizzati a partire dalla 
locazione $8000 (ovvero 32768 in decimale). 

Questi TOKEN sono quindi utilissimi per “creare" o modificare dei 
listati basic, ottenendo impensabili vantaggi in moltissimi casi. 

Vi invito quindi a "smanettare" un poco e ad ottenere degli effetti, 
tenendo conto che in un listato basic i valori da 0 a 128 corrispon¬ 
dono ai codici ASCII dei caratteri, mentre i valori da 129 a 255 corri¬ 
spondono ai TOKEN delle parole chiave, secondo la tabella pubbli¬ 
cata di seguito. 


Inviando 10 prove di acquisto* 
della rivista LIST’89 
riceverai in regalo 
l’indispensabile 
raccoglitore 
della tua biblioteca 
software LIST. 



Ritaglia e spedisci a fine anno le 10 prove ^ 

di acquisto con relativo nome, cognome 
e indirizzo a: EDICOMP s.r.L Via Flavio Stilicone 111 


00175 ROMA 


i 
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ALL ’INTERNO DEL 
COMMODORE 128 


di ANDREA PETRICONI 

na delle caratteristiche peculiari del Commodore 
128 è senza dubbio l’uscita video nel formato 80 co¬ 
lonne. 

Questa caratteristica avvicina molto il CI28 alla fa¬ 
scia dei Personal con caratteristiche più potenti. 
Analizziamo ora il modo di accedere ai registri di controllo del pro¬ 
cessore video 8563 ed alla sua memoria. 

La gestione dell’8563 viene effettuata grazie ai 37 registri sistemati 
al suo interno. 

L’accesso al chip avviene attraverso due sole locazioni di memoria 
poste nel banco 15, e precisamente la 54784 e la 54785. 

Nella locazione 54784 deve essere posto il numero (da 0 a 36) del 
registro che si vuole leggere o scrivere, mentre nella locazione 
54785 potremo leggere o modificare il contenuto del registro pre¬ 
scelto. 

La funzione di ciascuno dei 37 registri è illustrata nella seguente ta¬ 
bella: 

REGISTRO FUNZIONE 

0 numero di caratteri tra i sincronismi orizzontali 

1 caratteri per riga 

2 shift orizzontale di 8 pixel 

3 shift orizzontale di 4 pixel 

4 numero di righe 

5 shift verticale di 1 pixel 

6 numero righe visualizzate 

7 shift verticale di 8 pixel 

8 controllo interlacciamento 

9 linee di scansione per riga 

10 modo del cursore 

11 linee cursore 

12 inizio pagina video HI 

13 inizio pagina video LO 

14 posizione cursore HI 

15 posizione cursore LO 

16 posizione verticale penna ottica 


17 posizione orizzontale 

18 indirizzo video RAM HI 

19 indirizzo video RAM LO 

20 inizio pagina attributi HI 

21 inizio pagina attributi LO 

22 larghezza carattere 

23 altezza carattere 

24 scroll fine verticale 

25 scroll fine orizzontale 

26 registro colore caratteri e sfondo 

27 incremento per read/write 

28 indirizzo base caratteri 

29 n. linee di sottolineatura 

30 n. cicli per operazioni di blocco 

31 registro canale 

32 indirizzo blocco da copiare (HI) 

33 indirizzo blocco da copiare (LO) 

34 abilitazione inizio visualizzazione 

35 abilitazione fine visualizzazione 

36 velocità rinfresco 

Chi volesse effettuare esperimenti non dimentichi che alcuni valori 
possono far scomparire lo schermo o alterare il sincronismo del 
monitor. 

La memoria RAM dell’8563 è strutturata nel seguente modo: 
0-1999: mappa video dello schermo 

2000-3999: mappa degli attributi. Ha funzioni simili alla mappa che 
normalmente si usa in 40 colonne, ma con meccanismi diversi. In 
ogni byte, i bit 0-3 rappresentano il colore del carattere, il bit 4 (se 
settato) determina il lampeggio, il bit 5 la sottolineatura, il bit 6 il re¬ 
verse ed il bit 7 il set di caratteri 

8192-16383: quest'area di memoria contiene la definizione dei due 
set di caratteri alternativi, 16 byte per ogni carattere, di cui 8 usati e 
8 no. 

I seguenti esempi danno una chiara idea delle innumerevoli appli- 
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PER SAPERNE DI PIU’ 


cazioni che si possono fare manipolando, in modo adeguato, i 37 
registri. 

ROUTINE 1 

0 POKE 54784,0:POKE 54785,128:VOL 15 

1 SCNCLR 5:PRINT“ESEMPIO 1" 

2 SLEEP 3:SCNCLR 5 

3 FAST 

4 FOR 1 = 0 TO 199:PRINT“COMMODORE”;:NEXT I 

5 SLEEP 3 

6 POKE 54784,0:POKE 54785,90:SOUND 1,65000,933,,,,3 

7 GETKEYA$:POKE 54784,0:POKE 54785,128:END 

In questo primo esempio è stato manipolato il registro 0 in modo 
che sul video compaia un'effetto davvero interessante. 

Avete presente l'effetto che compare sul video del vostro TV quan¬ 
do non si riesce a sintonizzare bene il canale? 

Bene, con questo piccolo programma si ha lo stesso risultato. 

ROUTINE 2 

0 SCNCLR 5 

1 CHAR 1,30,12,“COMMODORE 128”:SLEEP 3 

2 FOR I =0 TO 102 

3 POKE 54784,2:POKE 54785,l:NEXT I 

4 END 

Nel mini programma viene manipolato il registro 2 (vedi tabella). 
Questo programma stampa la scritta Commodore 128 e dopo pochi 
istanti esegue lo shift orizzontale fino a riportarla alle coordinate 
dove si trovava pochi attimi prima: viene cioè effettuato uno scrol- 
ling orizzontale del video. 

ROUTINE 3 

0 PRINT CHR$(27)"R”:FAST 

I FOR 1 = 25 TO 1 STEP -1 

3 POKE 54784,6:POKE 54785,l:FORL = 1 TO 30 :NEXT L:NEXT I 

4 PRINT“(home) (etri 9) (80 spazi)” 

5 PRINT: FOR I = 1 TO 150:PRINT“COMMODORE”;:NEXT l:SLEEP 2 

6 FOR 1= 1 TO 25:NEXT L 

7 POKE 54784,6:POKE 54785,l:FOR L = 1 TO 30:NEXT L 

8 NEXT I 

II terzo esempio usa il registro 6 (numero righe visualizzate) in mo¬ 
do da creare un’effetto simile ad un sipario. Si usano due cicli 
for/next in modo da decrementare e incrementare il numero di ri¬ 
ghe visualizzate. 

ROUTINE 4 

0 SCNCLR 5:CHAR 1,30,0,“COMMODORE 128" 

1 SLEEP 3 

2 FOR 1 = 0 TO 32 

3 POKE 54784,7:POKE 54785,l:NEXT I 

Nell’esempio 2 veniva manipolato il registro 2 per creare uno scrol- 
ling orizzontale del video. Questa routine, invece, crea uno scrolling 
verticale .manipolando il registro 7 (shift verticale). 


ROUTINE 5 

10 SCNCLR 5:WINDOW 10,2,33,18,1 

20 FOR 1 = 0 TO 50:PRINT“COMMODORE”;:NEXTI 
30 SLEEP 3 

40 FOR I = 11 TO 0 STEP -1 POKE 54784,23:POKE 54785,l:FORL = 1 
TO 25: 

NEXTLNEXTI 
50 SLEEP 3 

60 FOR 1 = 0 TO 11 POKE 54784,23POKE 54785,l:FOR L = 1 TO 
25:NEXT L: 

NEXTI 

Questa routine permette di visualizzare i caratteri in modo davvero 
originale. 

Manipolando il registro 23 (altezza carattere) si determina, appun¬ 
to, l’altezza del carattere, incrementando o decrementando i valori 
del registro aumenta e diminuisce l’altezza dei caratteri. 

11 programma fa uso di due cicli FOR/NEXT per creare l’effetto che 
ho chiamato "veneziane". 

ROUTINE 6 

0 SCNCLR 5:FAST:FORI = 1 TO 23:PRINT“(80 CBM-F)”;:NEXT I 

1 FOR 1 = 1 TO 43POKE 54784,34POKE 54785,1 

2 POKE 54784,35POKE 54785,80-1 + 6 

3 NEXT:WINDOW 30,11,46,15,1 

4 PRINT“(2 CRSR DOWN) (2 SPAZI) COMMODORE 128” 

5 PRINT“(4 SPAZI) THE BEST (3 SPAZI)” 

6 PRINT“(3 SPAZI) IN THE WORLD” 

7 PRINT“(2 SPAZI) COMMODORE 128” 

9 PRINT 

10 FOR 1 = 43 TO 0 STEP -1POKE 54784,34POKE 54785,1 

11 POKE 54784,35POKE 54785,80-1+ 6:NEXT:GETKEYA$:END 

Mostra un esempio di utilizzo dei registri 34 e 35. 

Nell’esempio numero 3, veniva creato un sipario in senso orizzon¬ 
tale, mentre questa routine realizza un sipario in senso verticale. 

ROUTINE 7 

0 POKE 54784,0: POKE 54785,255 

1 POKE 54784,7:POKE 54785,15 

2 POKE 54784,6:POKE 54785,13 

3 SCNCLR 5:PRINT“(CTRL 9) ESEMPIO DI CARATTERI IN DOPPIA 
ALTEZZA 

”:END 

Tramite i registri 0,7 e 6 questo programma crea caratteri in doppia 
altezza. 

ROUTINE 8 

10 POKE 54784,9:POKE 54785,6 

Questa poke permette di restringere l’area di visualizzazione dei 
caratteri eliminando la linea di separazione che esiste tra un carat¬ 
tere e l’altro. Per ripristinare lo schermo sostituire il valore 6 con il 7 
alla locazione 54785. 
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il primo libro 
tutto Italiano sul “LOCO" 


Paolo Ciancarini 



Il linguaggio più facile 
per dialogare con il Computer 

EDICOMP ri. 

issa 


NOVITÀ 

il linguaggio LOGO e utilità COMMODORE 
su floppy da 5” y 4 

COMPRESO NEL LIBRO 



Indispensabile per programmare 
in «L 0 C 0» a un prezzo che è... 

QUASI UN DONO!!! 


Il LOGO è il linguaggio che si sta 
affermando, in Italia e all'estero, come 
il principale strumento per usare 
attivamente il computer nella scuola. 

Il LOGO serve per imparare a 
programmare giocando con, ma anche 
SENZA, il computer. 

Caratteristica di questo libro è il gran 
numero di esercizi-gioco contenuti 
in ciascun capitolo. 

Il volume è l'unico “italiano” per il LOGO 
del Commodore 64, e grazie al dizionario 
finale può essere usato anche da utenti 
Apple, IBM, Texas. 


L h, hall 0 

QIL 

l pacchetti applicativi completi 
sono così composti: 

m libro “io parlo LOCO” con incluso il lin¬ 
guaggio LOCO e utilità COMMODORE 
(L. 24.500) 

tu libro “io parlo LOCO” con linguag¬ 
gio LOCO e utilità COMMODORE + 
procedura LOCO TRIDIMENSIONALE 
(L. 39.000) 

ID procedure con esempi per lavorare in 
LOCO TRIDIMENSIONALE (L. 25.000) 

N.B. I prezzi sono comprensivi di IVA e spese postali 

COME RICEVERLO 

□ Ho inviato assegno bancario non tra¬ 
sferibile, di L. 

intestato a EDICOMP Srl 
□ Ho versato sul conto corrente postale 
n. 72609001 intestato a LIST - Pro¬ 
grammi per il tuo home computer - 
Via Flavio Stilicone 111 - 00175 Roma, 
di cui allego fotocopia. 

□ Ho effettuato vaglia postale intestato 
a EDICOMP Srl - Via Flavio Stilicone 
111 - 00175 Roma 

Compilare e spedire in busta chiusa a. 

EDICOMP Srl - Via Flavio Stilicone ili - 00175 Roma 

NOME . 

COGNOME . 

VIA . 

CAP.CITTA . 

PROV. 


Tel. 
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Listati 

Impeccabili 


Come ottenere dei listati perfetti, 


senza errori o refusi, dei vostri pro¬ 
grammi 

di BRUNO BARBONI ARQUATI 


Olivetti PRODEST 

PC 128s 


più volte per essere sicuri, nei limiti del possibile, di aver eliminato i 
piccoli errori di digitazione che spesso fanno impazzire chi deve 
copiarli) attenendosi alle seguenti norme fondamentali: 


1: adozione dei caratteri PICA e nella modalità di stampa più mar¬ 
cata di quella normalmente in uso sulla stampante (in genere ven¬ 
gono adottati caratteri DRAFT perché consentono elevata velocità 
di stampa), che si otterrà impartendo alla stampante (in BASIC e 
dopo averla accesa ed abilitata con il ben noto comando VDU 2) il 
comando VDU 1,27,1,71. 


er poter ottenere dei listati impeccabili è necessario 
rispettare alcune norme fondamentali, ben note ai 
collaboratori abituali e che ritengo opportuno ri¬ 
chiamare per tutti quei lettori che intendano inviare i 
loro elaborati all’esame della Redazione, sperando 
che il risultato del loro lavoro possa essere premiato con la pubbli¬ 
cazione sulle pagine della Rivista. 

I listati devono essere ottenuti direttamente dal programma che si 
intende far pubblicare (e che ovviamente dovrà essere stato testato 


2: l’interlinea desiderato è quello di 1/6” di pollice (ossia 4.23 mm): 
se la stampante risulta predisposta per un interlinea differente oc¬ 
correrà dare il comando VDU 1,27,1,50. 


3: la larghezza del listato, al fine di ottimizzare la utilizzazione dello 
spazio tipografico, dovrà essere limitata ai 40 caratteri per riga. 
Tale obbiettivo può essere ottenuto con l’uno o l’altro dei sistemi 
sotto descritti: 
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PROGRAMMI 



a) adottare direttamente sul computer, predisposto nel MODE 128, 
una rappresentazione su 40 colonne mediante l’istruzione BASIC 
WIDTH 40 e poi procedere alla stampa del listato, che verrà effet¬ 
tuata come desiderato. 

Ciò consente di esaminare in via preliminare direttamente sul moni¬ 
tor I' aspetto che avrà il vostro listato e di apportarvi quelle piccole 
modifiche che ne migliorino la sua presentazione grafica, ma il li¬ 
stato, una volta stampato, risulterà tutto spostato sulla sinistra del 
foglio. 


b) predisporre opportunamente la stampante per ottenere sia un li¬ 
stato su 40 colonne sia la sua centratura rispetto al foglio adottato, 
con margini eguali a destra e sinistra. 

Intervenendo direttamente sulla stampante potrete ottenere il risul¬ 
tato desiderato ed inoltre si potrà prefissare tanto il numero delle ri¬ 
ghe contenute in ogni foglio quanto il suo margine inferiore. 

I comandi da impartire alla stampante (sempre dopo averla abilita¬ 
ta con il comando VDU 2, non dimenticandosi però di disabilitarla 
al termine con un VDU 3 ad evitare di vederla scrivere tutto ciò che 
digitate) sono i seguenti: 

VDU 1,27,1,108,1,20 (fissa a 20 il margine sinistro) 

VDU 1,27,1,81,1,60 (fissa a 60 il margine destro) 

VDU 1,27,1,67,1,60 (fissa a 60 il numero delle linee stampate in ogni 
foglio) 

VDU 1,27,1,78,1,6 (fissa a 6 il numero delle linee da non stampare 
alla fine del foglio) 

Una volta che avrete terminato (dopo aver disabilitato la 
stampante ma senza spegnerla, pena vanificare il lavoro fatto) po¬ 
tete andare alla ricerca della directory in cui è contenuto il pro¬ 
gramma da caricare e procedere alla sua caricazione in memoria 
ed alla successiva stampa del relativo listato, previo eventuale suo 
controllo sul monitor dando i seguenti comandi diretti: 

WIDTH 40:VDU 14 <RETURN> (predisponete la rappresentazione del 
listato su 40 colonne e ne limitate lo scorrimento sul video) 

LIST <RETURN> (attivate l’esame del listato) 

Terminata la verifica preliminare del listato potere tornare alle con¬ 
dizioni normali dando il comando: 

WIDTH 0:VDU 15 <RETURN>. 

Ora potete tranquillamente riattivare la stampante, inserendovi un 
primo foglio e dare un LIST <RETURN>: procederete così alla stam¬ 
pa del vostro listato, preoccupandovi unicamente di inserire dei 
nuovi fogli man mano che il lavoro avanza e premendo il tasto 
<FORM FEED> della stampante per riattivarla al termine di ogni pa¬ 
gina. 

La procedura è certamente un po’ lunghetta, ma i risultati saranno 
impeccabili. 


PROGRAMMA DI STAMPA DEI II STATI 

Il programma che vi propongo è stato scritto per evitare che dei ba¬ 
nalissimi errori pregiudichino il risultato della stampa dei listati, co¬ 
stringendovi a ricominciare tutto da capo. Questo programma, in¬ 
fatti, è in grado di fare tutto lui, una volta lanciatolo, salvo alcune li¬ 
mitate digitazioni necessarie per attivare le varie opzioni, scegliere 


il programma da caricare e in fine accendere la stampante ed infi¬ 
larvi i vari fogli. 

Una volta lanciatolo esso svolgerà le seguenti mansioni: 


a) predisposizione della stampante, in conformità a ciò che è stato 
detto nel paragrafo precedente (salvo la selezione di caratteri PICA 
qualora ne fossero stati adottati altri), e con possibilità di eventuale 
adozione del modulo continuo. 

b) eventuale inizializzazione di un disco differente da quello con¬ 
tente il programma in questione. 


c) selezione di una directory diversa dalla principale, con anche la 
possibilità di una ulteriore selezione di una Sub-Directory, e la vi¬ 
sualizzazione del loro catalogo. 


d) scelta del programma da listare, il cui nome verrà memorizzato 
in vista del successivo suo caricamento in memoria. 

Tutte le istruzioni necessarie per un corretto uso del programma 
verranno presentate in apposite finestre dello schermo in modo da 
guidare, passo a passo, tutte le varie operazioni da effettuare, che 
termineranno con il caricamento semplice (effettuato con LOAD 
“Nome” non seguito da RUN) del listato del Programma prescelto, 
operazione attivata mediante semplice pressione del tasto funzio¬ 
ne <F0>. 

È ovvio che il caricamento del programma da listare determinerà la 
cancellazione di quello preesistente, ma non di quanto appare sul 
video né della predisposizione dei tasti funzione : ciò consentirà di 
procedere, come desiderato, alla stampa del listato. 

Basterà perciò premere nell'ordine i tasti <F5> (abilita la stampante) 
ed <F6> (impartisce il comando LIST) per iniziare a stampare: al ter¬ 
mine premere <F7> per disabilitare (con VDU 3) la stampante. Tutto 
qui. 


STRUTTURA DEL PROGRAMMA 
E ROUTINES PRINCIPALI 

Come mia abitudine, il programma utilizza sistematicamente le pro¬ 
cedure pre-definite, il che mi consente di scrivere dei programmi 
molto compatti e di agevole leggibilità. 

Nel caso del listato proposto vi sono poche linee di intestazione 
(che potete anche ridurre) ed in sole tre linee viene impostato il MO¬ 
DE, determinata la linea ove il programma salta in caso di errore ed 
infine vengono richiamate, nell’ordine stabilito, le varie procedure 
terminando poi con un END, cui fanno seguito le procedure in que¬ 
stione. 

Le varie linee del programma sono, in genere, di lunghezza conte¬ 
nuta al massimo, preferendo scrivere più linee separate, a tutto 
vantaggio della leggibilità del listato anche se ciò ne comporta un 
apparente allungamento. 

Apposite linee vuote delimitano opportunamente le varie procedu¬ 
re, in modo da ottenerne la massima leggibilità. 

Fra le varie routines contenute nelle procedure (di alcune di esse, di 
uso generale, vedasi altro mio articolo) particolarmente interessan¬ 
te risulta quella introdotta per effettuare il controllo del nome delle 
directory e dei programmi: ad evitare infatti loro errate trascrizioni 
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l’INPUT degli stessi si effettua copiandoli dal catalogo visualizzato 
sul video per il tramite del tasto <COPY> e dei tasti cursori. 

Ciò non esclude però che vengano copiati anche spazi vuoti od al¬ 
tri caratteri spuri che potrebbero determinare un errore del tipo 
“Bad name": la routine esamina la stringa introdotta eliminando gli 


spazi vuoti e limitandola ai 10 caratteri. 

In totale si tratta di poco meno di cento linee di facile digitazione, 
con una occupazione di memoria pari a 5,3 Kbytes. 

Buona digitazione dunque ed a rivederci prossimamente con altre 
proposte interessanti. 


IO REM ****************************** 
20 REM * "Print_l ist" * 

30 REM * Preparazione stampante per * 
40 REM * i listati destinati a LIST * 
50 REM ****************************** 
60: 

70 REM Bruno Parboni Arquati 
80: 

90M0DE128:ON ERROR GOTO 990 
100PR0CTitolo:PROCprinter:PROCintro:PR 
□Cistruzioni:PROCexec 

110END:REM - 

120 : 

130 DEFPROCexec 

140CLS:PRINTTAB(0,0)STRING*(80,CHR*191 
>;:VDU20:PRINTTAB<0,1)"SONO PRONTO A CAR 
ICARE IL LISTATO PRESCELTO: PROCEDI COME 
DALLE ISTRUZIONI SOPRARIPORTATE PREMEND 
0 PRIMA IL TASTO FUNZIONE <F0>"PROCinv 
150PRINT" (che carica automaticamente 
il programma desi derato)"; :VDU20:PRINT" 

: APPENA PRONTO PREMI NELL'ORDINE I TAST 

I <F5> "; :PROCinv:PRINT" (che apre il ca 
naie di stampa) “; :VDU20 

160PRINT" POI IL TASTO <F 6 > ";:PROCinv 
:PRINT" (che lancera' la stampa) "; :VDU2 
0:PRINT" ED AL TERMINE IL TASTO <F7> ";: 
PROCinv:PRINT" (per richiudere il canale 
della stampante) "5 :VDU20:PRINT" NON DI 
MENTICARTENE ! " 

170PRINTSTRING*(80,CHR*191):PROCinv : VD 
U28,0,31,79,17:CLS:VDU15 
180*KEY 0 LOAD Pro*!M 
190*KEY 5 VDU2IM 
200*KEY 6 LIST !M 
210*KEY 7 VDU3IM 
220 ENDPROC 
230: 

240 DEFPROCTitolo 

250VDU26:VDU20:CLS:PRINTTAB(0,0)CHR*16 
3 5 STRING*(78,CHR*166); CHR*165;CHR*169; TA 
B(79,1)CHR*169;CHR*169;TAB(79,2)CHR*169; 
CHR*171 ;STRING*(78,CHR*166); CHR*173 ; 

260PRINTTAB(3,1)"Selezione dei program 
mi e loro caricamento in memoria, prepar 
azione del la";TAB(4,2)"stampante e succe 
ssi va stampa del listato secondo lo stan 
dard di ""LIST""."; 

270PRINTTAB(1,4)"Questo breve programm 
a ti consentirà' di selezionare dapprima 
la Directory che ti interessa e, succe 
ssivamente, caricare in memoria il progr 
amma che desideri listare adottando le 
40 colonne per ogni riga "; 

280PRINT"e selezionare i caratteri ""N 
LQ"", il tutto al -fine di rispettare gl 
i standard richiesti dalla Redazione del 
la Ri vista ""LIST"": basterà' seguire 
le varie istruzioni che ti saranno date. 

II 

290F0R i 7.=4 TO 8 : PRINTTAB (0, i 7.) CHR*169 
; TAB (79, i 7.) CHR*169; : NEXT: PRINTTAB (0, i7.) C 
HR*170;STRING*(78,CHR*166);CHR*172; 
300PR0Cwind_testo:PROCinv: CLS 
310 ENDPROC 
320: 

330 DEFPROCintro 

340CLS: VDU20: PRINTTAb <18, L7 .) " Desideri 
inserire un disco diverso? (S/N) "; : PRO 
Cinv:s*=GET*:IF s*<>"S" AND s*<>"s" THEN 
PROCdelete:G0T0370 ELSE PROCdelete 

350PRI NTTAB (8,L7.) " Inserisci il nuovo 


disco nel drive e premi <RETURN> ";:REPE 
AT UNTIL GET*13 
360*M0UNT 

370CLS:DX=0:PRINTTAB(10,0)"Per prima c 
osa eccoti il catalogo della Directory " 
"*"" 1 ";TAB(0,2)"TITLE: "; :0SCLI"DIR*": * 
EX 

380PR0Cscelta 

3901NPUTTAB (0,L/i-1 ) " "dir*: PROCcontrol 1 
a(dir*>:dir*=b*:DIR*="DIR*."+dir*:0SCLI 
DIR* 

400CLS:PRINTTAB(8,0)"Questa e' la Dire 
ctory ";dir*|" che hai seiezionato:":PRI 
NT:*CAT 

410PR0Cconf:PROCdelete:IF stpX>2 THEN 
PROCsub: PROCdel ete ELSE D7.= l 

420PR0Cscel ta: IF D7.=0 THEN 430 ELSE 44 

0 

4301NPUTTAB (0, L7.-1 ) " "Subdir*: PROCcontr 
olla(Subdir*):Subdir*=b*:DIR*="DIR*."+di 
r*+". "+Subdir*:OSCLI DIR*: CLS: D7.= l : *EX 
440PR0Cscel ta: INPUTTAB (0,L7.-1 ) " "Pro*:P 
ROCcontrolla(Pro*):Pro*=b* 

450 ENDPROC 
460: 

470 DEFPROCscelta 

480IF D7.=0 THEN d*-"la Directory" ELSE 
d*="il Programma" 

490PRINTTAB < 14,L7.-1) "Scegli ";d*;" che 
desideri copiandone il Nome" ; TAB ( 15,L7.) 
"mediante l'uso dei tasti cursore:"; 
500PRINTTAB(74,20)CHR*136;CHR*164;" "; 

.CHR*162;CHR*137;TAB(76,19)CHR*139;TAB(76 
,21)CHR*138; 

510 ENDPROC 
520: 

530 DEFPROCprinter 

540PR0Cinv:CLS:PRINT'" ORA PROVVEDO AL 
LA PREDISPOSIZIONE DELLA STAMPANTE SECON 

DO LO STANDARD ""LIST." 

550PRINTTAB(1,3)"DESIDERI ADOTTARE IL 
MODULO CONTINUO OPPURE FOGLI SINGOLI? (C 
/S) " ; : REPEAT: mod*=GET*: mod7.= INSTR ( "CcSs" 
,mod*) : UNTIL mod7.: PRINTTAB (3,5) "PRESCELT 
0 " ; : IF mod7.<3 THEN PRINT"M0DUL0 CONTINU 
0" ELSE PRINT"FOGLIO SINGOLO" 

560REPEAT: VDU20: PRINTTAB (2,L7.) "<ACCEND 
I LA STAMPANTE E IMMETTICI UN FOGLIO, PO 
I PREMI LA BARRA SPAZIATRICE>"; :Z=INKEY( 
60):IF Z=32 THEN 580 

570PR0Csound : PROCi nv: PRINTTAB ( 1 ,L7.) STR 
ING*(78," ")5 :Z=INKEY(60) 

580UNTIL Z=32 

590PR0Cinv:CLS:VDU2:VDU1,27,1,71,1,27, 
1,50:VDU1,27,1,108,1,20,1,27,1,81,60:VDU 
3:REM NLQ e margini sin. e dx 

600IF mod7.<3 THEN VDU2: VDU1,27,1,67,1, 
60:VDU1,27,1,78,1,6:VDU3:REM 60 righe ut 
ili +6 marg. in-f. 

610VDU28,20,31,59,10: CLS 
620VDU2:PRINT"0ra ti stampo un paio di 
linee di testo,a titolo di controllo de 
Ila predisposi- zione effettuata, in mod 
o che tu possa, se necessario, interveni 
re con un coman-do <ESCAPE> ed arrestare 
i1 Programma:":VDU3 
630PRINT:VDU20:PRINT"TI RACCOMANDO DI 
NON SPEGNERE LA SPAMPANTE! NE CANCELLERE 
STI LA PREDISPOSIZIONE!":PROCinv:PRINT'" 
Sfila il foglio utilizzato per la prova 
e mettine uno nuovo, poi premi il tasto 
<F0RM FEED> della stampante,"; 

640PRINT" che sara' cosi' pronta per 


il listato prescelto." 

650PR0Cwind_testo:PROCpausa_l:PROCdele 
te 

660 ENDPROC 
670: 

680 DEFPROCistruzioni 
690PR0Cwind_l i sta 

700PR0Csound:PRINTTAB(4,0)"Ora verrà' 
caricato il programma da te prescelto, c 
ioe' "; :PROCinv:PRINT" ";Pro*j" "«VDU20 
710PRINTTAB(0,1) "Naturaimente r;u«?l i o i 
n memoria viene cancellato: occorre quin 
di dare dei comandi diretti e cioè' per 

primo PROCinv:PRINT" LOAD""Nome. 

VDU20:PRINT", ed appena caricato il list 
ato, darei 1 comando "; 

720PR0Ci nv: PRINT.LIST.; : VDU20: PR 

INT" per stampare i varii fogli, da sost 
ituire man mano che ne avrai terminato u 
no. " ; 

730PR0Csound:PROCpausa_l:PROCwind_test 
o:PR0Cin\ 

740 ENDPROC 
750: 

760 DEFPROCcontrol1 a(A*) 

7701 7.=LENA*: a*=" " : b*=" " : i 7.=0: REPEATi i 7. 
= i7.+ lia**MID*(A*,i7., 1) : b*=b*+a*: UNTIL AS 
Ca*<33 OR i7.>10:b*=LEFT*(b*,i7.-l) : ENDPRO 
C 

780dir*=b*:ENDPROC 
790: 

800 DEFPROCpausa: REPEAT: PRINTTAB (R7.,L7. 
)"<PREMI LA BARRA SPAZIATRICE>";:UNTIL G 
ET=32:ENDPROC 
810: 

820 DEFPROCpausa_l 

830REPEAT: PRINTTAB (R7.,L7.) "<PREMI LA BA 
RRA SPAZIATRICE>"; :Z=INKEY(50):IF Z=32 
THEN ENDPROC 

840PRI NTTAB < R7., L7. ) ; STR ING* ( 30, " " ) ; : Z= 
INKEY(50) 

850UNTIL Z=32 
860 ENDPROC 
870: 

880 DEFPROCsub : VDU20 : PR I NTTAB ( 14, L7. ) " 
Desideri selezionare una Sub-Directory? 
(S/N) ";: REPEAT :sub*=GET*:sub7.= INSTR ("Ss 
Nn" , sub*) : UNTILsubV.: PRINTsub*; " "; : PROCi 
nv:ENDPROC 
890: 

900 DEFPROCconf : VDU20: PRINTTAB (14,L7.) " 
Va bene la Directory che ho selezionato 
? (S/N) " ; : REPEAT : stp*=GET*: stp7.= INSTR ( " 
SsNn",stp*):UNTILstp7.:PRINTstp*;" :PR0 

Cinv:ENDPROC 
910: 

920 DEFPROCinv:C0L0UR0:C0L0UR129:ENDPR 
OC 

930 DEFPROCsound:S0UND1,-8,105,8:SOUND 
3,-7,80,6:ENDPROC 

940 DEFPROCwind_testo:VDU28,0,31,79,10 
: L7.=21 : R7.=25: ENDPROC 

950 DEFPROCwind_lista:VDU28,1,8,78,4iL 
7.=4: R7.=24: VDU20: CLS: ENDPROC 

960 DEFPRULdeiete: PRINTTAB (0,L7.) STRING 
* (80, " "); TAB (0,L7.) ;: ENDPROC 
970: 

980 REM-ON ERROR- 

990REP0RT:PRINT" (Errore ";ERR;" alla 
linea ";ERL;") ";:VDU6:VDU3 
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PROGRAMMI 

Olivetti PRODEST 

Ecco un gioco in cui la vostra abilità 

PC 128s 


di ENRICO FABRIZI e prontezza di riflessi verrà messa a dura prova 



M’interno di un “pozzo" piovono dall’alto frammenti 
di diversa forma e colore: vostro compito dirigerli e 
ruotarli in modo da incastrarli perfettamente uno 
con l’altro sul fondo del pozzo. 

Ogni volta che è completata una riga orizzontale, es¬ 
sa viene cancellata e tutto il materiale accumulato slitta verso il 
basso. 

Ogni 50 pezzi usciti, il grado di difficoltà aumenta, fino a giungere a 
difficoltà 9, ed i frammenti cadono a velocità crescente. 

Sulla destra del quadro è visualizzato il punteggio ed il numero 
complessivo di pezzi usciti, entrambi continuamente aggiornati, 
mentre al di sotto sono evidenziati i pezzi in gioco unitamente ai re¬ 
lativi punteggi e statistiche. Il completamento di una riga fa guada¬ 
gnare 100 punti. 

I comandi sono gestiti esclusivamente dal joystick. La leva spostata 
verso destra o sinistra muove lateralmente il pezzo mentre il pul¬ 
sante di fuoco ne provoca la rotazione. Lo spostamento della leva 
verso il basso accelera la caduta del frammento che si inserisce ra¬ 
pidamente nella posizione prescelta. 

Al termine di una partita vengono visualizzate due classifiche, una 
relativa alle partite correnti e l’altra con i punteggi più alti realizzati 
fin dalla prima utilizzazione del gioco. 

Quest’ultima è ovviamente registrata su dischetto in un file chiama¬ 
to “CLASSPUZZL” che viene automaticamente creato dal pro¬ 
gramma ed aggiornato prima di ogni suo abbandono, sia che que¬ 
sto avvenga utilizzando l’opzione di fine partita che premendo il ta¬ 
sto “ESCAPE” durante il suo svolgimento. 

Se proprio mentre state per battere il record vi sentite stanchi o ve¬ 
nite disturbati, niente paura: è sufficiente premere la barra spazia¬ 
trice per interrompere la partita ed avere così il tempo di riposarvi o 
di ...allontanare l’intruso. Una seconda pressione dello stesso tasto 
consente di riprendere il gioco esattamente allo stesso punto in cui 
lo avete lasciato. 


STRUTTURA DEI PROGRAMMA 

Come potete facilmente comprendere, la parte più difficoltosa e 
quindi più lunga del programma è quella che gestisce i movimenti 
dei pezzi, sia evitando che essi escano dal campo di gioco o si so¬ 
vrappongano, che curando il regolare spostamento e rotazione. A 
tale scopo sono dedicate le procedure dalla riga 630 alla riga 2300 


10REM*** 


*** 

20REM*** 

PUZZLE 

#** 

30REM*** 

EN-FA.SOFT-1988 

*** 

40REM*** 

PC 128-S 

*** 

50REM*** 

OLIVETTI PRODEST 

*** 

60REM*** 


*** 


700NERR0RG0T02470 

80DIMPAR7.(6) ,PAR*<6) ,REC7.<6) ,REC* (6) : 
A=OPENIN"CLASSPUZZL"sIFA=0G0T0100 

90F0RK7.= 1T06 s I NPUT#A, REC7. ( K% ) , REC* ( K7. 
)sNEXT 

100CL0SE#A 

110VDU23,200,204,52,20,236,236,20,52,2 
04,23,201,51,44,40,55,55,40,44,51,23,202 
,0,0,255,153,102,90,153,153,23,203,204,3 
6,23,233,20,42,73,137,23,204,51,36,232,1 
51,40,84,146,145 

120VDU23,205,145,146,84,40,151,232,36, 
36,51,23,206,137,73,42,20,233,23,36,204, 
23,207,153,153,90,102,153,255,0,0 

130M0DE129 s VDU23,1 ! s PROCpres s DIMP7. ( 29, 
13), PU7. ( 7 ) s F0RK7.=0T029 s P7. ( K7., 0 ) =9s P% (K7., 
13)=9 s NEXTs A1*=CHR*255:A2*=STRING*(2,CHR 
*255)s A3*=STRING*(3,CHR*255)s A4*=STRING* 
<4,CHR*255) 

140B1*=CHR*210 s B2*=STRING*(2,CHR*210): 
B3*=STRING*(3,CHR*210):B4*=STRING*(4,CHR 
*210) 

150M0DE129:VDU23,1 ! 19,3,4117,1,23,210, 
0,0,0,8,0,0,0,8: F0RK7.=0T029 : FOR J7.= 1 TO 12 : 
P7. ( K7., J7. ) =0 : NEXT J7., K7. : FQRK7.= 1T07 : PU7- ( K7. ) 
=0: NEXT: PG7.=0: PZ7.=0: DIF7.= 1 

160F0RK7.=2T029 : PRINTTAB < 0, K7. ) CHR*200 : N 
E X T : PRI NTT AB (0,30) CHR*203 : F0RK7.= 1 TO 12 : PR 
INTTAB(K%,30)CHR*202: NEXT:PRINTTAB <13,30 
) CHR*204 : F0RK7.=29T02STEP-1 : PR I NTTAB <13, K 
7.)CHR*201:NEXT 

170VDU 17,2: F0RK7.=2T029 : PR INTTAB ( 1, K7. ) S 
TRING* <12,CHR*210): NE X T 

180VDU17,2,17,131:PRINTTAB(23,1)CHR*20 
6+STRING* <6,CHR*207)+CHR*205:PRINTTAB <23 
,2)CHR*200;:VDU17,1 :PRINT"PUZZLE"; :VDU17 
,2:PRINTCHR*201:PRINTTAB(23,3)CHR*203+ST 
RING* < 6,CHR*202)+CHR*204 

190VDU17,1,17,128:PRINTTAB(16,5)"Punti 
: ";PG7.; TAB (29,5) "Pezzi : " ; PZ7-: VDU17, 1 : P 

RINTTAB(14,7)STRING* < 26,CHR*207):PRINTTA 
B <14,8)STRING* < 26,CHR*202) 

200VDU17,2:PRINTTAB(25,10)"VALORE";TAB 
<33,10)"USCITI":VDU17,1 :PRINTTAB(19,12)A 
3*;TAB(30,12)"7";TAB(35,12);PUX<1):PRINT 
TAB(19,13)A1* 

210VDU17,2:PRINTTAB(19,15)A3*;TAB(30,1 
5) "7"; TAB (35,15) ;PU7.<2) : PRINTTAB (21,16) A 
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che controllano i movimenti pezzo per pezzo e posizione per posi¬ 
zione. 

70-140: 

Dimensionamento vettori, caricamento dei dati della classifica, de¬ 
finizione dei caratteri speciali, assegnazione delle stringhe utilizza¬ 
te per visualizzare i pezzi e presentazione grafica. 

150-230: 

Stampa del quadro di gioco. 

240-420: 

Routine di svolgimento del gioco. 

430-550: 

Routine di fine partita con visualizzazione delle classifiche. 

560: 

Aggiornamento della classifica generale su dischetto. 

570: 

Stampa del messaggio finale che scorre in basso sul video. 
580-620: 

Presentazione grafica e quadro esplicativo dei comandi. 
630-2300: 

Procedure di controllo del movimento dei pezzi. 

2310-2340: 

Gestione degli eventi che si verificano quando viene completata 
una riga. 

2350-2390: 

Aggiornamento punteggio. 

2400-2420: 

Procedure sonore. 

2430: 

Gestione sospensione dell’esecuzione del programma. 

2440-2460: 

Dati per la presentazione grafica. 

2470-2500: 

Routine controllo errori. 


AVVERTENZE IMPORTANTI 

1. Premendo il tasto “ESCAPE” durante l’esecuzione, la routine 
controllo errori della riga 2490 provoca l’interruzione del gioco e il 
richiamo automatico dalla directory principale di un programma 
“MENU” in essa eventualmente presente (cfr. "Super directory” 
pubblicato nel numero 4 di aprile 1988). 

2. Alcuni comandi VDU del listato sono completati dal carattere 
speciale "s” reperibile sotto il tasto BREAK. Attenzione non confon¬ 
derlo con i due punti durante la copiatura! 


1$:VDU17,3:PRINTTAB(20,18)A2S;TAB(29,18) 
"IO" ; TAB (35,18) ; PU7. (3) s PRINTTAB ( 19,19) A2 
* 

220VDU17,1 :PRINTTAB(19,21)A2S;TAB(29,2 
1)"IO";TAB(35,21);PU7.(4):PRINTTAB(20,22) 
A2S:VDU17,2 s PRINTTAB(18,24)A4*;TAB(30,24 
) "5"; TAB (35,24) ; PU7. (5) : VDU17,3: PRINTTAB ( 
19,26) A2S ; TAB ( 30,26 ) " 5 " ; TAB (35,26); PU7. ( 6 
)sPRINTTAB(19,27)A2S 

230VDU17,1 :PRINTTAB(15,29)STRINGS(12," 
*" ) ; TAB (28,29) " ÌOO" ; TAB (35,29) ;PU7.(7) s VD 
U17,2,17,131:PRINTTAB(15,31)"Difficolta' 
: " ; : VDU17,128:PRINT" ";DIF7.; 

240F7.=RND ( 6 ) : X7.=4 : X17.=4 : Y7.=3 : D7.= 1 : D17.= 
1 : PZ7.=PZ7.+ 1: PRINTTAB (36,5) ; PZ7.: PU7. (F7.) =P 
U7. I FF7.< 6PRI NTT AB ( 35,9+F7.*3 ) ; PU7. ( F 

7.) ELSE PRINTTAB (35,26) ; ;PU7.(F7.) 

250F0RK%= 1TOIO-DI FY .: Z=INKEY(0) : IFZ=32P 
ROCpausa 

26OONF7.PROC A1S, PR0CA2S, PROCB1S, PR0CB2S 
, PROCCS, PROCDS : X17.=X7. : D17.=D7. 

270A7.=ADVAL (O) : IF ( A7.=256ANDK7.< 10-DIF7.) 
OR (A7.=512ANDK7.< 10-DIF7.) NEXTK7. 

280IF ( A7.AND1 ) =0G0T0300 
290D7.=D7.+1 : IFD7. >4D7.= 1 : G0T0330 ELSE330 
300B7.= ( A7. AND255 ) / 16 : I FB7.= 1 X7.=X7.-1 : GOTO 
330 

3101 FB7.=8X7.=X7.+1 : G0T0330 
3201FB7.=2K7.= IO-DIF7.: G0T0340 
330IFA7.< >256ANDA7.< >512F0RJ7.= 1T0500: NEX 
TJYm 

3400NF7.PR0C A1R, PR0CA2R, PROCB 1R, PR0CB2R 
, PROCCR, PROCDR : NEXTK7. 

350Y7.=Y7.+1 : ONF7.PROC A1S, PROCA2S, PROCB 1S 
, PR0CB2S, PROCCS, PROCDS : ONF7.PROCA 1C, PROCA 
2C,PROCB1C,PR0CB2C,PROCCC,PROCDC 

360IFE7.= lPR0CSA:PR0Cptg (F7.) ELSE IFB7.= 
2F0RK7.= 1 TO 1 : G0T0340 ELSE250 
3701 FY7.< 5G0T0430 

3800NF7.PR0CA 1D, PRQCA2D, PROCB 1D, PR0CB2D 
, PROCCD, PROCDD : F0RK7,=29T03STEP-1 : CTRL=0 : 
FOR J 7.= 1 TO 12 : IFP7. (K%, J 7. ) =OCTRL= 1 : J 7.= 12 
390NEXTJ7.: IFCTRL=OPROCSC: PROCscal : K7.=K 
7-+1 

400NEXTK7.: IFINT (PZ7./50) < >INT ( (PZ7.+ 1) /5 
O)ELSE240 

4101FDI F7.=9G0T0240 

420DI F7-=D I F7.+1 : FORL7-= 1 TO 15 : PROCSG: PROC 
SA : NE X TL7. : PR I NTT AB ( 28,31 ) ; DIF7. ; : G0T0240 
430MG*=STRING$(39," ")+"GAME OVER"+STR 
ING^ (40, " ") :K7.=0: VIN7.=0: REPEAT K7.=K7.+ 1: 
IFPG7.>PAR7. (K7.) FORJ7.=6TOK7.-*-lSTEP-l : : PAR7. ( 
J7.) =PAR7. ( J7.-1 ) : PARS ( J7.) =PAR* ( J7.-1 ) : NEXTJ 
Ym : PSX=K7 : VI NX= 1 

440UNTI LK7.=50RV I N7.= 1 : IFVI N7.= 1 ELSE PROC 
stmp(31):G0T0480 

450MGS=MGS-*-"Scrivi il tuo nome: "+STRI 
NGS ( 19, " ") :PAR7.(PS7.)=PG7.:PR0Cstmp(31) : I 
NPUTTAB (21,31)"" PARS ( PS7. ) ; 

460K7-=0 : VI N7.=0 : REPEAT K7.=K7.+1 : IFPG7. >RE 
C7. (K7.) FORJ7.=6TOK7.-i-lSTEP-l : : REC7. ( J7.) =REC7. 
( J7.-1 ) : RECS ( J7.) =RECS ( J7.-1 ) : NEXTJ7-: PA7-=K7. 
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s VIN7=1 

470UNTILK7.=50RV IN7.= 1: IFVIN7.= 1REC7. (PA7) 
=PAR7. (PS7.) s REC* (PAX) =PAR* ( PS7 / 

480M0DE135 s VDU23, 1 ! : F0RK7=0T01 : PRINTTA 
B(10)CHR*129CHR*141"P U Z Z L E" : NE 
XT s PRINTTAB(10,3)CHR*131"CLASSIFICA PAR 
TITA" 

490F0RK7.= 1T05 : IFPAR7 (K7 ) =0G0TQ510 
500PRINTTAB (4*K7+5) CHR* (K7+128) ;K7." " 

LEFT* (PAR* <K7.) ,10) +STRING* ( 10-LENPAR* (K7. 
>," "),PAR7(K7) 

51 ONE X TK7- s PR I NTTAB ( 10,12 ) CHR*131" CLASS 
IFICA GENERALE" 

520F0RK7=1T05: IFREC7. (K7) =0G0T054O 
530PRI NTTAB ( 4, K7.+14 ) CHR* (K7+128); K7. " 

" LEFT* ( REC* ( K7 ) , 10 ) + STRING* ( 1O-LENREC* (K 
7.)," ">,REC7(K7) 

540NEXT: MG*=STRING* (42, " " > +"Un’al tra 
partita? (S/N)"+STRING*(16," ") .-PROCstmp 
(23)s Z=GET 

550IFZ=830RZ=115G0T0150 
560A=0PENQUT"CLASSPUZZL" : F0RK7.= 1T06 : PR 
INT#A , REC/C (K7.) , REC* (K7.) : NEXT: CLOSE#A: OSC 
LI"DIR*":CHAIN"MENU" 

570DEFPR0Cstmp (G7.) F0RL7.= lT0LENMG*-39: 
PR I NTTAB ( 0, G7. ) MID* ( MG*, L7., 39 ) ; : F0RH7.= 1TO 
500: NEXTH7., L7. : ENDPROC 

580DEFPR0Cpr es VDU 17,2: F0RK7.=5T012: FOR 
J7=2T032STEP6: PRINTTAB (J7.,K7.) STRING*(5,C 
HR*255) : NEXTJ7, K7 

590VDU17,1:MG*=STRING*(39," ")+CHR*135 
+ " EN. FA - SOFT "-«-STRINGA ( 14, " " ) : PROCstmp ( 
26):VDU17,3:MG*=STRING*(39," ")+ M Present 
a"+STRING*(16," "):PROCstmp(28) 

600VDU 18,4,0: RESTORE: F0RL7.= 1T091 : READX 

7., Y7.: F0RK7.= 1T02: F0RJ7.=200T050STEP-25: SOU 
ND1 , -10, J7., 0: NEXTJ7. : M0VE640,0 : DRAWX7.*32, 
1023-Y7*32: NEXTK7:PRINTTAB ( X7,Y7> " " : NEX 
TL7. 

610Z = INKEY <500):CLS:PRINTTAB(16)"COMAN 
DI " : VDU17,1 : PRINT 5 * ? ? ? "Joystick Dx - e Sx . : 

spostamento":VDU17,2:PRINT’ ? "Pulsante d 
i -fuoco: rotaz i one" : VDU17,3: PRINT 7 9 " Joys 
tick in basso: accelerazione caduta" 

620VDU17,1 : PRI NT ? ? 51 "Barra spaziatrice 

: pausa esecuzi one" : VDU17,2: PRINT’ ? 51 ’ 51 ? " 
Premi un tasto per iniziare":Z=GET:ENDPR 
OC 

630DEFPR0CA1R : VDU 17,2: OND 17.G0T0640,650 
, 6 6 O,67U 

640PRI NTTAB ( X 17., Y7.-1 ) B3^ ; : PR I NTTAB ( X 17. 
, Y7.) B1$:G0T0680 

650PRI NTTAB ( X 17., Y7.-2 ) B1 $ ; : PR I NTTAB ( X 17. 
, Y7.-1 ) Bl$; : PRINTTAB ( X 17., Y7.) B2t-; : G0T0680 
660PRI NTTAB (X 17.+2, Y7.-1 ) Bl* : PRI NTTAB (X 1 
/I, Y/l) B3T: G0T0680 

6 70PRI NTT AB ( X 17., Y7.-2 ) B2t- : PR I NTTAB ( X17.+ 
1 ,Y7.-1)B1$: PRINTTAB(X 17.+ 1 ,Y7.)B1^ 
680ENDPR0C 

690DEFPR0CA1S: VDU 17,1: 0ND7.G0T0700,760, 


810,870 

700IFX7.0X17. ELSE740 
710IFX7.>X17. ELSE730 

720IFP7. (Y7.-1 , X7.+2) >00RP7. ( Y7., X7.) >0X7.=XI 

7.. -G0T0750 ELSE750 

7301FP7. ( Y7.-1 , X7. ) >00RP7. ( Y7., X7. ) >0X7.=X 17. : 
GQT0750 ELSE750 

7401 FD7.< >D 17.ANDX7.> 10X7.= 10 
750PRI NTTAB ( X7., Y7.~ 1 ) A3* : PR I NTTAB ( X7., Y7. 
)A1$:G0T0920 

7601 FX7.C >X 17. ELSE800 
770IFX7.>X17. ELSE790 

7801FP7. ( Y7.-2 , X7. ) >00RP7. ( Y7.-1 , X7. ) >00RP7. ( 
Y7., X7.+ 1 ) >0X7.=X 17.: G0T0800 ELSE800 

7901FP7. ( Y7.-2, X7.) >00RP7. ( Y7.~ 1 , X7. ) >00RP7. ( 
Y7., X7.) >0X7.=X17. 

800PRI NTTAB ( X7., Y7.-2) Alt: PRI NTTAB ( X7., Y7. 
-1 > A1 $ : PR I NTTAB ( X 7., Y7. ) A2$ : G0T092C 
810IFX7.OX17. ELSE85C 
820IFX7.>X17. ELSE840 

830IFP7. (Y7.-1 , X7.+2) >00RP7. ( Y7., X7.+2) >0X7.= 
X17.:G0T0860 ELSEB60 

840IFP7. (Y7.-1 , X7+2) >00RP7. ( Y7., X7.) >0X7.=X1 
7:G0T0860 ELSE860 

8501FD7< >D 17.ANDX7 > 10X7= 10 
860PRI NTTAB ( X 7+2, Y7-1 ) Al#: PRI NTTAB ( X7., 
Y7)A3#:G0T0920 

S70IFX7.OX17. ELSE910 
880IFX7>X17 ELSE900 

890IFP7 ( Y7-2, X7+1 ) >00RP7 (Y7.-1, X7.+ 1 ) >00 
RP7(Y7,X7+1)>0X7=X17:G0T0910 ELSE910 
9001FP7 ( Y7. -2, X7 ) >00RP7 ( Y7-1 , X7.+1 ) >00RP 
7. ( Y7, X7.+1 ) >0X7=X 17. 

91OPRI NTTAB ( X7., Y7.-2 ) A2$ : PR I NTTAB ( X7+1 , 
Y7-- DAI#: PR I NTTAB ( X7+1 , Y7. ) A1 $ 

920ENDPR0C 

930DEFPRQCA1C : E7.=0 : I FY7.+1 >29 E7.= 1 : Y7=2 
9: ENDPROC ELSE 0ND7.G0T0940,950,960,970 
940IFP7 (Y7.+ 1 , X7) >00RP7 (Y7 , X7.+ 1 ) >00RP7 ( 
Y7,X7+2)>0 E7=l:G0T0980 ELSE980 

950IFP7. (Y7.+ 1 , X7) >00RP7 (Y7.+ 1 , X7.+ 1 ) >0 E7 
= 1 :G0T0980 ELSE980 

960IFP7 (Y7+1 , X7) >00RP7 (Y7+1 , X7.+ 1 ) >00RP 
7(Y7+1,X7+2)>0 E7=l:G0TQ980 ELSE980 

970IFP7(Y7-1,X7)>00RP7(Y7+1,X7+1)>0 E7 

= 1 

980ENDPR0C 

990DEFPR0CA1D : 0ND7.G0T01000,1010,1020,1 

030 

1000F0RL7=0T02: P7. ( Y7.-1 , X7+L7) =1 : NEXT: P7. 
(Y7,X7)=1 : GOTO1040 

1010F0RL7=0T02: P7 ( Y7.-L7, X7) =1 : NEXT: P7 ( Y 

7., X7.+1 ) = 1 : GOTO 1040 

1020F0RL7=0T02:P7(Y7,X7+L7)=1 :NEXT:P7(Y 
7.-1 , X7.+2) =1 : GOTO 1040 
1030F0RL7=0T02: P7 ( Y7-L7, X7+1 ) =1 : NEXT: P7. 
(Y7-2,X7)=1 
1040ENDPR0C 

1050DEFPR0CA2R:VDU17,2:OND17G0T0106 0,10 
70,1080,1090 

106OPR I NTTAB ( X17., Y7-1 ) B3* ; : PR I NTTAB ( X17 
+2,Y7)Bl#:G0T01100 
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1070PRINTTAB ( X IX, Y7.-2 ) B2t ; s PRINTTAB ( X17. 
,YX-l)Blt; :PRINTTAB(XlX,YX>Blt; sGOTOHOO 
108DPR I NTTAB ( X17., YX-1 ) B1 t s PR I NTTAB (XIX, 
YX)B3t: GOTO 1100 

1090PRI NTTAB < X1X+1. YX-2 ) B1 t : PR I NTTAB ( X 1 
7.+1 , YX-1)B1t:PRI NTTAB ( X17., YX ) B2t 
11OOENDPROC 

111ODEFPROCA2S : VDU 17,2: ONDXGOO1120,118 
0 y 1230.1290 
1120IFXXOX1X ELSE1160 
1130IFXX>X1X ELSE 1150 

11401FPX ( YX-1 , XX+2 ) >OORPX ( YX, XX+2) >0X7.= 
X17:GOTO1170 ELSE1170 
U50IFP7.(Y7.-1 ,X7.) >00RP7. ( Y7., XX+2) >0X7.=X1 
7.: GOTO 1170 ELSE 1170 
11601F DX< >D17.AND X7. > 10X 7.= 10 
11 7 OPRI NTTAB ( X7., Y7.-1 ) A3* : PR I NTTAB ( XX+2 , 
Y7.) Alt: GOTO 1340 
U80IFX7.OX17. ELSE 1220 
U90IFX7.>X17. ELSE 1210 

12001FP7. ( YX-2, XX+1 ) >00RP7. ( Y7.-1 , X7.) >OORP 
7. (Y7.,X7.) >0X7.=X 17.: GOTO 1220 ELSE 1220 
12101FP7. ( Y7.-2, X7. ) >00RP7. ( Y7.-1 , X7.) >00RP7. ( 
Y7.,X7.) >0X7.=X17. 

1220PRI NTTAB ( X7., Y7.-2 ) A2t : PR I NTTAB ( X7., Y7. 
-1 ) A1 * : PR I NTTAB ( X 7., Y7. ) A1 $ : GOTO 1340 
1230IFXXOX1X ELSE 1270 
1240IFX7.>X17. ELSE 1260 

12501FPX(YX-1 ,X7.) >00RP7. (Y7., X7.+2) >0X7.= X1 
7.: GOTO 1280 ELSE 1280 

1260IFP7.(Y7.-1 ,X7.) >00RP7. < Y7., X7.) >0X7.=X17.: 
GOTO1280 ELSE1280 
12701 FD7.< >D 17.ANDX7. > 10X7.= 10 
1280PRI NTTAB ( X7., YX-1 ) A1 * : PR I NTTAB ( X7., Y7. 
)Alt:GOTO1340 
1290IFXXOX1X ELSE 1330 
1300IFXX>X1X ELSE 1320 

1310IFPX(YX-2,XX+1) >00RPX(YX-1 ,XX+1) >00 
RP7. ( Y7., X7.+1 ) >0X7.=X 17.: GOTO 1330 ELSE 1330 
13201FP7. ( Y7.-2, X7.+1 ) >00RP7. ( YX-1 ,X7.+ 1) >00 
RP7.(Y7.,X7.) >0X7.= X17. 

1330PRI NTTAB ( X7 .+1 , YX-2 ) A11 : PR INT1RB ( X7.+ 
1 , YX-1 ) A11 : PR I NTTAB ( X7., Y7. ) A2t 
1340ENDPR0C 

1350DEFPR0CA2C: E7.=0: IFYX+1>29 E7.= l : Y7.=2 
9 : ENDPROC ELSE 0ND7.G0T01360, 1370,1380,13 
90 

13601FP7. ( Y7., X7. ) >00RP7. ( Y7., X7.+1 ) >00RP7. ( Y7. 
+l,XX+2)>0 E7.= l: GOTO 1400 ELSE1400 
1370IFP7. (YX+l , X7.) >00RP7. ( Y7.-1 , XX+1 ) >0 E7. 
=1:GOTO1400 ELSE1400 
13801FPX (YX+l , X7.) >00RP7. (YX+l , XX+1 ) >OORP 
7. ( Y7.+1 , XX+2 ) >0 E7.= 1 : GOTO 1400 ELSE 1400 
1390IFPX (YX+l, XX) >00RP7. <YX+l, XX+1 ) >0 E7. 
= 1 

1400ENDPR0C 

1410DEFPR0CA2D : 0ND7.G0T01420, 1430,1440,1 
450 

1420F0RL7.=0T02: PX ( Y7.-1 , XX+LX) =2: NEXT: F7. 
( Y7., XX+2) =2: GOTO 1460 
1430F0RLX=0T02:PX(YX-LX,XX)=2:NEXT:PX(Y 
7.-2, XX+1 ) =2: GOTO 1460 


1440F0RLX=0T02:PX(YX,XX+LX)=2:NEXT:PX(Y 
7.-1 ,X7.) =2: GOTO 1460 

1450F0RLX=0T02: PX (Y7.-L7., XX+1 ) =2: NEXT: PX 
<Y7.,X7.)=2 
1460ENDPR0C 

1470DEFPR0CB1R: VDU 17,2: OND17.G0T01480,14 
90,1480,1490 

1480PRI NTTAB ( X 17.-»-1 , YX-1 ) B2t ; : PR I NTTAB ( X 
1X, Y7. ) B2t : GOTO 1500 

1490PRI NTTAB ( X 17., Y7.-2 ) B11 ; : PR I NTTAB ( X 17. 
,Y7.-l)B2t; :PRINTTAB(X1X+1 ,YX)Blt; 

1500ENDPR0C 

151ODEFPROCB1S : VDU 17,3: 0ND7.G0T01520,158 
0,1520,1580 
15201FXX< >XIX ELSE1560 
1530IFXX>X1X ELSE1550 

1540IFPX (YX-1 , XX+2) >OORPX ( YX , XX+1 ) >0X7.= 
XI7.: GOTO 1570 ELSE 1570 
1550IFPX(YX-1,XX+1)>OORPX(YX,XX)>0XX=X1 
7. : GOTO 1570 ELSE 1570 
15601 FDX< >D17.ANDXX > 10X7.= 10 
1570PRI NTTAB ( X7.+1 , YX-1 ) A2t : PR I NTTAB ( XX, 
YX)A2t: GOTO1630 
I5QOIFXXOX1X ELSE 1620 
1590IFXX>XIX ELSE1610 

1600IFPX(YX—2,XX)>OORPX(YX-1,XX+1)>OORP 
X(YX,XX+1)>OXX=XIX:GOTO1620 ELSE1620 
16101FPX(YX-2,XX)>OORPX(YX-1,XX)>OORPX< 
YX,XX+1)>OXX=X1X 

1620PRINTTAB(XX,YX-2)A1t:PRINTTAB(XX,YX 
-1)A2t:PRINTTAB(X X+1,YX)A11 
1630ENDPR0C 

16 40DEFPR0CB1C:EX=0:IFYX+l>29 EX=1:YX=2 
9:ENDPROC ELSE 0NDXG0T01650,1660,1650,16 
60 

1650IFPX(YX+1,XX)>OORPX(YX+l,XX+1)>OORP 
X(YX,XX+2)>0 EX=1:GOTO1670 ELSE1670 
16601FPX(YX,XX)>OORPX(YX+l,XX+1)>0 EX=1 
1670ENDPR0C 

1680DEFPR0CB1D:0ND7.G0T01690,1700, 1690,1 
700 

1690F0RLX=0T01 :PX(YX-1,XX+LX+l)=3:PX(YX 
,XX+LX)=3:NEXT:GOTO1710 
1700PX(YX-2,XX)=3:PX(YX-1,XX)=3:PX(YX-1 
, X7.+1 ) =3: PX ( YX, X7.+1 ) =3 
171OENDPROC 

1720DEFPR0CB2R:VDU17,2:OND1XGOTO1730,17 
40,1730,1740 

1730PRINTTAB(XIX,YX-1)B2t; :PRINTTAB(XIX 
+1,YX)B2t: GOTO1750 

1740PRINTTAB(X1X+1,YX-2)B11; :PRINTTAB(X 
1X,YX-1)B2t 5 :PRINTTAB(X1X,YX)B11; 
1750ENDPR0C 

1760DEFPR0CB2S:VDU17,1:ONDXGOTO1770,183 
0,1770,1830 
1770IFXXOX1X ELSE 1810 
1780IFXX>XIX ELSE1800 

17901FPX(YX-1,XX+1)>OORPX(YX,XX+2)>OXX= 
XIX:GOTO1820 ELSE1820 
18001FPX(YX-1,XX)>OORPX(YX,XX+1)>0XX=X1 
X:GOTO1820 ELSE1820 
18101FDX<>D1XAND X X >10 X X=10 
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1820PRINTTAB ( X7. f Y7.-1 ) A2* s PRINTTAB (X7.+ 1, 
Y7.)A2$: GOTO 1880 
1830IFX7.OX17. ELSE 1870 
1840IFX7.>X17. ELSE 1860 

1850IFP7.(Y7.-2,X7.+ 1) >00RP7. < Y7.-1, X7.+ 1 > >00 
RP7.(Y7. f X7.) >0X7.= X 17.: GOTO 1870 ELSE 1870 
1860IFPX(Y%-2,XX+1> >00RP7.(Y7.-1 ,X7.) >OORP 

%(Y% f x%) >oxy.=xr/. 

1670PRINTTAB ( X7.+1, Y7.-2 )A1S:PRINTTAB ( X7., 
Y%-1 ) A2$s PR I NTTAB < X7., Y7. ) A1 * 

1880ENDPR0C 

1890DEFPR0CB2C s E7.=0 s IF Y7.+1 >29 £7.= 1 s Y7.=2 
9s ENDPROC ELSE 0ND7.G0T01900,1910,1900,19 
10 

1900IFP7.(Y7.,X7.) >00RP7.(Y7.+ l f X7.+ l> >00RP7.( 
YY.+ l,X7.+2) >0 E7.= l: GOTO 1920 ELSE1920 
1910IFP7.(Y7.,X7.+ 1) >00RP7.(Y7.+ 1,X7.) >0 E7.= l 
1920ENDPR0C 

1930DEFPR0CB2D s 0ND7-G0T01940,1950. 1940.1 
950 

1940F0RL7.=0T01 : P7. ( Y7.-1, X7.+L7. ) = 1 s P7. ( Y7., X 
m /.+L7m +1 )= 1 : NEXT s GOTO 1960 
1950F7. ( YY.-2, X7.+1 ) = 1 s P7. ( Y7.-1, X7. ) = 1 : P7. ( Y7. 
-1 , X7.+ 1 ) =1 : F7. <YY.,X7.)=1 
1960ENDPR0C 

1970DEFPR0CCR s VDU 17,2: OND17.G0T01980,199 
0,1980,1990 

1980PRI NTTAB ( X 17., Y7. ) B4$ ; : G0T02000 
1990F0RL7.=Y7.-3T0 Y7. : PR I NTTAB ( X17., L7. ) B1 * ; 
:NEXTL7. 

2000ENDPR0C 

201ODEFPROCCS : VDU 17,2: 0ND7.G0T02020,2080 
,2020,2080 

2Q20IFX7.OX17. ELSE2060 
20301FX7 >X17 ELSE2050 

2040IFP7. <Y7., X7.+3) >0X7.=X17.: G0T02070 ELSE 
2070 

2050IFPY. (Y7.,X7.) >0X7.=X 17.: G0T02070 ELSE20 
70 

20601 FD7.< >D 17.ANDX7. >9X7.=9 
2070PRI NTTAB ( X7., Y7. ) A4* : G0T02110 
2080IFX7.0X17. ELSE2100 

20901FP7. ( Y7.-3, X7. ) >00RPY. ( Y7.-2, X7. ) >00RP7. ( 
Y7.-1 , X7.) >00RP7. ( Y7., X7.) >0X7.=X17. 

2100F0RL7.=Y7.~3T0Y7. : PR I NTTAB ( X7., L7. ) A1 $ ; : 
NEXTL7. 

2110ENDPR0C 

2120DEFPR0CCC : E7.=0 : IFY7.+1 >29 EY.= 1 : YY.=29 
.-ENDPROC ELSE 0ND7.G0T02130,2140,2130,214 

0 

2130IFP7. (Y7.+ 1, X7.) >00RP7. (Y7.+ 1 , X7.+ 1 ) >OORP 
7. ( YY.+ l , X7.+2) >00RP7. (Y7.+ 1 , X7.+3) >0 E7.= l : GOT 
02150 ELSE2150 
21401FP7. ( Y7.+1, X7. ) >0 E7.= 1 
2150ENDPR0C 

216ODEFPROCCD : 0ND7.G0T02170,2180,2170,21 
80 

2170F0RL7.=0T03 : F7. ( Y7., X7.+L7.) =2: NEXT: GOTO 
2190 

2180FQRLY.=0T03: P7. ( Y7.-L7., X7.) =2: NEXT 


2190ENDPR0C 

2200DEFPR0CDR : VDU 17,2 : PR I NTTAB ( X17., Y7.~ 1 
)B2^-; :PRINTTAB(X17.,Y7.)B2^5 .-ENDPROC 
221ÒDEFPROCDS: VDU 17,3: IFX7-OX17. ELSE225 

0 

2220IFXY.>X1Y. ELSE2240 

2230IFP7.(Y7.-1 ,X7.+ 1) >00RP7. ( Y7., X7.+ 1 ) >0X7.= 
X 17. : G0T02250 ELSE2250 
2240IFP7.( Y7.-1,X7.) >00RP7. ( Y7., X7.) >0X7.=X17. 
2250PRI NTTAB ( X7., Y7.-1 ) A2t : PR I NTTAB ( X7., Y7. 
* A2t- 

2260ENDPR0C 

2270DEFPR0CDC: E7.=0: IFY7.+ 1 >29 E7.= l : Y7.=29 
:ENDPROC 

22801FF‘7. ( Y7.+1 , X7.) >00RP7. ( Y7.+1 , X7.+ 1 ) >0 E7. 
= 1 

2290ENDPR0C 

2300DEFPR0CDD: F0RL7.=0T01 : P7. (Y7.-1 , X7.+L7.) 
=3 : P7. ( Y7., X7.+L7. ) =3 : NEXT : ENDPROC 
231 ODEFPROCsca 1 F0RL7.= 1TO12 : PR I NTTAB ( L7. 
,K7.) : Z=INKEY (10) : NEXTL7.: PROCptg (9) : PU 

7.<7)=PU7.(7)+1:PRINTTAB(35,29) ;PU7.(7) : FOR 
L7.= 1 TO 12: F0RR7.=K7.-1T03STEP-1 
23201FP7. ( R7., L7. ) =0VDU 17,2 : PR INTTAB ( L7., R7. 
+ 1)CHRS210 ELSE VDU17, P7. (R7., L7.) : PRI NTTAB 
<L7.,R7.+ 1)CHR*255 

2330P7. ( R7.+1 , L7. ) =P7. ( R7., L7. ) : NEXTR7., L7. 
2340ENDPR0C 

2350DEFPR0Cptg (FIG7.) IFFIG7.>6P7.= 100: GOT 
02390 

23601FFI G7.< 3P7.=7 : G0T02390 
23701 FF I G7.< 5P7.= 10 : G0T02390 
2380P7.=5 

2390PG7.=PG7.+P7. : VDU 17,2 : PR I NTTAB ( 23,5 ) ; P 
G7.: ENDPROC 

2400DEFPR0CSG SOUND1,-10,20,1:ENDPROC 
241ODEFPROCSA SOUND1,-10,200,1:ENDPROC 
2420DEFPR0CSC F0RH7.=52T0100STEP4 : SOUND 1 
,-10, H7., 1 : NEXTH7.: ENDPROC 
2430DEFPR0Cpausa REPEAT:Z=INKEY(10):VDU 
17, l.-PRINTTAB (32,31) "PAUSA"; : W=INKEY(10) 

:VDU17,0:PRINTTAB(32,31)"PAUSA"; :UNTILZ= 
320RW=32:ENDPROC 

2440DATA 4,6,6,9,11,5,16,7,18,10,24,9,3 
6,10,30,9,29,8,24,8,21,6,20,9,28,9,34,10 
,28,6,16,10,11,7,10,9,29,10,34,6,36,8,21 
,8,14,6,6,12,4,11,11,10,14,9,30,5,35,10 
2450DATA 11,8,30,7,36,6,5,6,24,10,18,8, 
15,6,4,7,6,11,34,9,21,7,17,10,5,7,30,10, 

10.5.23.10.4.9.36.7.14.7.28.5.22.10.10.6 
,36,9,17,6,28,10,11,6,30,8,16,6,29,9,29, 
6 

2460DATA 20,6,4,10,35,6,5,12,29,5,5,11, 

22.6.35.9.10.7.23.6.28.8.10.10.15.7.34.7 
,20,7,28,7,17,9,4,12,35,7,5,10,30,6,6,10 
,29,7,11,9,22,7,15,8,18,9,14,8,23,9,20,8 
,10,8,5,9 

2470REM***R0UTINE CONTROLLO ERRORI*** 
2480IFERR=1940SCLI"CLOSE":RUN 
2490IFERR=17G0T0560 

2500PRINT"Errore n. ";ERR" sulla riga 
ERL:REPORT:PRINT: END 
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Olivetti 


PRODEST 


PC 128s 


Una partita di filetto spaziale alla 

di RAFFAELE PINNA moda del signor Spaak, il vulcaniano di Star Trek 

Mister Spaak 


uale appassionato sostenitore del film di fantascien¬ 
za non ha mai visto qualche alieno, o perfino il vul¬ 
caniano Spaak di Star Trek, cimentarsi in una partita 
di filetto a tre dimensioni? Finalmente anche noi po¬ 
tremmo addentrarci in quel gioco per seguirne l'intri¬ 
cata logica allo scopo di realizzare uno dei 76 filetti possibili. Lo 
schema di gioco è costituito da quattro griglie di 4x4 locazioni, di¬ 
sposte parallelamente tra loro. Per indicare al programma dove in¬ 
tendiamo posizionare la pedina occorre immettere tre coordinate 
corrispondenti nell'ordine al livello, alla riga e alla colonna. I livelli 


sono indicati dal basso verso l’alto con i numeri 1-2-3-4, le righe 
delle lettere A-B-C-D, le colonne da sinistra a destra con i numeri 1 - 
2-3-4. Lo scopo del gioco è di mettere in fila quattro pedine in una 
delle direzioni consentite, il primo dei due giocatori che riuscirà nel¬ 
l’intento sarà il vincitore della partita. Al termine della partita il pro¬ 
gramma chiederà se desideriamo disputarne un’altra o se si desi¬ 
dera terminare, questo per un tempo di circa trenta secondi, quindi 
entrerà in automatico ovvero posizionerà casualmente le pedine fi¬ 
no alla realizzazione di un filetto e proseguirà con la richiesta di 
gioco. 



ÌOREM ***************** 

20REM * MR. SPAAK * 

30REM * Angel Soft « 

40REM * 1989 * 

50REM ***************** 

600N ERROR CL0SE#0:RUN 
70M0DE129:VDU23,1ì:OK1=0 
80PR0Cc1(1):PROCw("MR. SPAAK",14.5,0) 
s PROCscreer» : PROCa 1 : PROCv ( 1 ) 

90CLS:PROCw("PLAYER 1",0,3):N=1 :COLOU 
R3:PROCw("COORDINATE",0,6):PROCw("LEVEL 
: ",0,8):PROCw("LETTER: ",0,9):PROCw(" 

NUMBER: ",0,10):PROCinput:PROCpiece(LP, 

XP,YP,1>:PROCctrl:IF ER=1 G0T090 

1OOCLS:PROCw("PLAYER 2",0,3):N=2:COLOU 
R3:PROCw("COORDINATE", 0,6 ) :PROCw("LEVEL 
: ”,0,8):PROCw("LETTER: ",0,9):PROCw(" 

NUMBER: ",0,10):PROCinput:PROCpiece(LP, 

XP,YP,2):PROCctrl:IF ER=1 G0T0100 
110CLS:G0T090 

120DEFPR0Cscreen:FOR A=0 TO 3:B=246*A 
PROCcO(3) 

130PR0Cparal1(662,B+B,1126,8+B,896,238 
+ B,433,238+B) 

140PR0C1ineO(550,238+B,780,8+B): PROCIi 
neO(664,238+B,896,8+B): PROCIineO(780,238 
+B,1012,8+B): PROCIineO(604,65+B,1068,65+ 
B) : PROCI ineO (550, 124+B, 1012,124+B) .-PROCI 
ineO(492,180+B,954,180+B):S0UND1,-15,50* 
(A+l),1 
150NEXT 
160ENDPR0C 

170DEFPR0Cc0 <N):GCOLO,N:ENDPROC 
180DEFPR0Cparal 1(X1,Y1,X2,Y2,X3,Y3,X4, 
Y4) : MOVEX1,Y1:DRAWX2,Y2:DRAWX3,Y3:DRAWX4 
,Y4:DRAWX1,Y1:ENDPROC 

190DEFPR0C1ine0(Xl,Yl,X2,Y2):MOVEX1,Yl 
:DRAWX 2,Y2:ENDPROC 

200DEFPR0C1 inel(XI,Y1):DRAWX1,Yl:ENDPR 
OC 

21ODEFPROCfili(XI,Y1,N):GCOLO,N:PLOT13 
3,XI,Y1:ENDPROC 

220DEFPR0Cc1(N ) :COLOUR N:ENDPROC 
230DEFPR0Ccentre(A$,X,Y):X= ( X-LEN(A*) ) 
/2:PRINTTAB ( X,Y);A$:ENDPROC 

240DEFPR0Cp<A$,X,Y):PRINTTAB ( X,Y); A*;: 
ENDPROC 

250DEFPR0Cpiece(L,X,Y,N):IF LOC(LP,XP, 
YP) < >0 ER=1:ENDPROC ELSE ER=0 

260S0UND1,-15,108*N,1 :X=692+X*l16-Y*58 
:Y=36+Y*56+L*244:PROCel 11 (X,Y,3):PROCell 
1(X,Y+10,N):IF N=1 LOC(LP,XP,YP)=1 :ENDPR 
OC ELSE LOC(LP,XP,YP)=-1:ENDPROC 

270DEFPR0Cel 1 1(X,Y,N):GCOLO,N:MOVEX,Y: 
MOVEX + 44, Y : PL0T205 ,X-20,Y+16 :ENDPROC 
280DEFPR0Cwin (N) 

290 IF 0K1=1 ENDPROC 
300PR0Cv (0) : CLS 

310PR0Cw< "COMPLIMENTI PLAYER "+STR$(N) 

,10,10) 


320PR0Cw("HAI FATTO FILETTO",11,12):FO 
R A=0 TO 250 STEF 20:S0UND1,-15,A,1 :SOUN 
DI,-15,A-10,1:NEXT 

330PR0Cw("VUOI GIOCARE ANCORA (S/N) ?" 
,0,29):TIME=0:REPEAT:A$=INKEY*<5> rUNTIL 
A$="S" OR A*="N" OR (TIME DIV 100)>=10 
340IF A$="S" RUN ELSE IF A$="N" GOTO 1 
070 

3500K1=1:G0T0880 
360DEFPR0Cv(V) 

370IF V=1 VDU28,0,31,9,0 
380IF V=0 VDU28,0,31,39,0 
390ENDPR0C 
400DEFPR0Cw< A*,X,Y) 

410X=X*32:Y=Y*32:Y=1016-Y 
420VDU5:PROCcO(2):MOVEX,Y:PRINTA$:PROC 
cO(1):MOVEX+4,Y+6:PRINTAS:VDU4:VDU23,1 ! : 
ENDPROC 

430DEFPR0CÌnput 

440PR0Cw(":",6,8):LI$=GET$:L=VAL(LI$): 
IF L<1 OR L>4 THEN440 
450PR0Cw(LI$,8,8) 

460PR0Cw(":",6,9):LT$=GET$:IF LT*<"A" 
OR LT*>"D" THEN460 
470PR0Cw(LT*,8,9> 

480PR0CW(":",6,10):NU*=GET*:X=VAL(NUt) 
:IF X<1 OR X>4 THEN480 
490PR0Cw(NU*,8,10) 

500YP~ASC(LT$)-65:XP=X-1:LP=L-1:ENDPRO 
C 

SlODEFPROCctr11 : REM ORIZZONALE PIANO 
520B=0:FOR A=0 TO 3lB=B+LOC(LP,A,YP):N 
EXT:IF ABS(B)=4 PROCwin(N):0K=1:ENDPROC 
530B=0:0K=0:ENDPROC 

540DEFPR0Cctr12:REM VERTICALE PIANO 
550B=0:FOR A=0 TO 3:B=B+LOC(LP,XP,A)iN 
EXT:IF ABS(B)=4 PROCwin(N):0K=1:ENDPROC 
560B=0:0K=0:ENDPROC 

570DEFPR0Cctr13:REM DIAGONALE PIANO 
580B=0:FOR A=0 TO 3:B=B+LOC(LP,A,A): NE 
XT:IF ABS(B)=4 PROCwin(N):0K=1:ENDPROC 
590B=0:FOR A=0 TO 3:B=B+LOC(LP,A,3-A): 
NEXT:IF ABS(B)=4 PROCwin(N):0K=1:ENDPROC 
600B=0:0K=0:ENDPROC 

6lODEFPROCctr14:REM ORIZZONALE SPAZIO 
620B=0:FOR A=0 TO 3:B=B+LOC(A,A,YP): NE 
XT:IF ABS(B)=4 PROCwin(N):0K=1:ENDPROC 
630B=0:FOR A=0 TO 3:B=B+LOC(3-A,A,YP)i 
NEXT:IF ABS(B)=4 PROCwin(N):0K=1:ENDPROC 
640B=0:0K=0:ENDPROC 

650DEFPR0Cctr15: REM VERTICALE SPAZIO 
660B=0:FOR A=0 TO 3:B=B+LOC(A,XP,A): NE 
XT:IF ABS(B)=4 PROCwin(N):0K=1:ENDPROC 
670B=0:FOR A=0 TO 3:B=B+LOC(3-A,XP,A): 
NEXT:IF ABS(B)=4 PROCwin(N):0K=1:ENDPROC 
680B=0:0K=0:ENDPROC 

690DEFPR0Cctr16: REM DIAGONALE SPAZIO 
700B=0:FOR A=0 TO 3:B=B+LOC(A,A,A):NtX 
T:IF ABS(B)=4 PROCwin(N):0K=1:ENDPROC 
710B=0:FOR A=0 TO 3:B=B+LOC(3-A,A,A):N 
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EXT:IF ABS(B)=4 PROCwin(N)iOK-1:ENDPROC 
720B=0:FOR A*0 TO 3:B=B+LOC(A,A,3-A)iN 
EXT:IF ABS(B> =4 PROCwin(N):0K=1:ENDPROC 
730B=0:FOR A*0 TO 3:B=B+LOC(3-A,A,3-A) 

:NEXT:IF ABS(B)=4 PROCwin(N)i0K=1:ENDPRO 
C 

740B=0:0K*0:ENDPROC 
750DEFPR0Cctr17: REM COLONNA SPAZIO 
760B=0:FOR A=0 TO 3:B=B+LOC(A,XP,YP)iN 
EXT:IF ABS(B)=4 PROCwin(N):0K=1:ENDPROC 
770B=0:0K=0:ENDPROC 

780DEFPR0Cctr1 :PROCctrl1:IF 0K=1 ENDPR 
OC 

790PR0Cctrl2:IF 0K=1 ENDPROC 
800PR0Cctr13:IF 0K=1 ENDPROC 
810PR0Cctr14:IF 0K=1 ENDPROC 
820PR0Cctrl5:IF 0K=1 ENDPROC 
830PR0Cctrl6:IF 0K=1 ENDPROC 
840PRQCctrl7:IF 0K=1 ENDPROC 
850ENDPR0C 
860DEFPR0Ca1 

870DIM LOC(3,3,3):FOR A=0 TO 3:F0R B=0 
TO 3:FOR C=0 TO 3:L0C(A,B,C)=0:NEXT:NEX 
T:NEXT:ENDPROC 
880CLS:VDU23,1 ! 

890PR0Cc1(1):PROCw("MR. SPAAK",14.5,0) 

:PROCscreen:0K=0:FOR A=0 TO 3:FOR B=0 TO 
3:FOR C=0 TO 3:LOC(A,B,C)=0:NEXT:NEXT:N 
EXT 

900PR0Cw("VUOI ",0,10):PROCw("GlOCARE", 
0,11) : PROCw("ANCORA",0,12):PROCw("(S/N)? 
",0,13) 

910N=1:PROCcasual:PROCpiece(LP,XP,YP,1 
):PROCctrl:IF ER=1 G0T0910 

920IF 0K=1 0K=0:PR0Critardo:G0T0880 
930A*=INKEY$(100):IF A*="S" RUN ELSE I 
F A*="N" GOTO1070 

940IF 0K=1 0K=0:PR0Critardo:G0T0880 
950N=2:PROCcasual:PROCpiece(LP,XP,YP,2 
>:PROCctrl:IF ER=1 G0T0950 

960IF 0K=1 0K=0:PR0Critardo:G0T0880 
970A*=INKEY*<100) : IF A*="S" RUN ELSE I 
F A$="N" G0T01070 

980IF 0K=1 0K=0:PR0Critardo:G0T0880 
990G0T0910 
lOOODEFPROCcasual 

101OLI %■ =CHR* ( I NT ( RND ( 1 ) *20 ) +49 ) : L=VAL (L 
I*):IF L<1 OR L>4 THEN1010 
1020LT$=CHR$(INT(RND(1)*20)+49):IF LT*< 

"A" OR LT*>"D" THEN1020 
1030NU$=CHR$(INT(RND(1)*20)+49):X=VAL(N 
U$):IF X<1 OR X >4 THEN1030 
1040YP=ASC(LT*)-65:XP=X-1:LP=L-1:ENDPRO 
C 

1050DEFPR0Critardo 
1060F0R A=1 TO 5000:NEXT:ENDPROC 
1070CLS:PROCw("SEE YOU AT NEXT GAME.",0 
,0):PROCw("THANK YOU TO PLAY.".0,1):PRIN 
T ? : END 

_t! 
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Olivetti 


PRODEST 



Un diabolico rompicapo per PC 128 


PC 128 


di GIULIO VANNINI e ANGELO COCCETTINI che metterà a dura prova la pazienza dei fanatici di questi giochi 


Tetra N 


a quando è stato pubblicato il programma “Squig- 
gle”, non avevamo più presentato giochini di quel ti¬ 
po. Eppure, spesso i “fanatici” del computer amano 
questo genere di rompicapi, e noi naturalmente sia¬ 
mo tra quelli. Prendendo spunto da un programma 
scritto in GWbasic, abbiamo realizzato stavolta un programma 
che, tra i rompicapi di nostra conoscenza, ci sembra veramente il 
più diabolico. 

Il gioco ricorda, un po’ alla lontana, il vecchio gioco del quindici. 
Appena dato il RUN," potrete scegliere tra due diverse modalità di 
gioco. Per ragioni che presto saranno chiare, è consigliabile co¬ 
minciare premendo il tasto “2”. 

All’inizio verranno visualizzate due plance di gioco uguali, costitui¬ 
te da 16 caselle ciascuna, alcune delle quali occupate da un qua¬ 
drato bianco. La griglia in alto a sinistra contiene anche un cursore 
a forma di “X”, che può essere mosso sopra qualsiasi casella, pie¬ 
na o vuota, usando i tasti cursore. Lo scopo del gioco è riuscire a 
far assumere alla plancia di gioco la configurazione assunta da 
quella in basso a destra. Le regole che consentono di modificare la 
struttura della matrice sono visualizzate in basso a sinistra, accan¬ 
to alle diciture “angolo”, “lati”, “centro”. Il significato delle strane 
figure a destra delle scritte è presto spiegato: se il cursore si trova in 
uno dei quattro angoli, premendo ENT si provoca il “NOT logico” 
secondo la maschera relativa alla dicitura “angolo”. A questo pun¬ 
to qualcuno di voi si chiederà se occorra essere laureati in mate¬ 
matica o ingegneria per giocare a TETRAN. Niente affatto, e ve lo 
dimostriamo. In parole più povere, la sibillina frase soprascritta si¬ 
gnifica questo: se vi trovate in un angolo, l’effetto della mossa è 
quello di invertire il contenuto di alcune caselle, secondo la forma 
disegnata in piccolo accanto ad “angolo”. Le caselle piene che 
occupano le due posizioni adiacenti al cursore in senso orizzontale 
e verticale, e quella subito successiva alla sua posizione in senso 
diagonale diverranno vuote, e viceversa. Se ancora il concetto non 
vi è chiaro, vi invitiamo a provare voi stessi qualche mossa a caso. 
In fondo dovete giocarci, no? 

Per quanto riguarda le mosse relative ai lati ed alle quattro caselle 
centrali, il discorso è completamente analogo a quanto appena 
detto, con la differenza che le maschere di inversione sono diverse, 
corrispondenti alle figure visualizzate in basso. 

Le prime volte che si gioca a TETRAN si ha l’impressione che sia 
praticamente impossibile raggiungere la disposizione proposta, in 
quanto due o tre mosse sono più che sufficienti a gettare la griglia 
nel disordine più totale. Tuttavia basta seguire dei “percorsi” rego¬ 
lari del tipo “tutte-quelle-in-alto" oppure “tutte-quelle-al-centro”, 
per ottenere, da una forma simmetrica, quasi tutte le altre. Il proble¬ 
ma sorge qualora scegliate, all’inizio della partita, l’opzione “ran- 
dom”, che inizializza la plancia di gioco completamente a caso 


(entro i limiti della funzione RND del PC128, che tanto random non 
è!). Giocando in questo modo dovrete affidarvi alla vostra intelli¬ 
genza ed al vostro colpo d'occhio, in quanto non esistono regole 
fisse da seguire. 

Alla fine della partita compariranno le penalità, calcolate in base al 
tempo ed al numero di mosse effettuate. Se non riuscite proprio a 
terminare il gioco o .... ne avete abbastanza di TETRAN, potete in¬ 
terrompere in qualsiasi momento con il tasto ACC. 


1 REM ***X*****X***X******* 

2 REM * TETRAN * 

3 REM * BY BETASOFT * 

4 REM * GIULIO VANNINI * 

5 REM * ANGELO COCCETTINI * 

6 REM * COPYRIGHT 1989 * 

7 REM ******t************** 

8 • 

IO CLBAR,,2 

20 DEFGRS( 0 )=255,255,255,255,0, 0, 0, 0 
30 DEFGRS(1)=0,0,0,0, 255,255,255,255 
40 QS=CHRS(8 > +CHRS(9)+CHRS CIO)+CHRS(11) + 
CHRS(13) 

50 CONSOLE , , , , 0 :SCREEN 6,0,0:CLS 
80 LOCATE 16,16,0:PRINT M PREMI :” 

70 LOCATE 10,18,0:PRINT ”1 per schemi RA 
NDOM” 

80 LOCATE 8,20,0:PRINT "2 per forme pre 
fissate” 

90 ATTRB 1,lsDO:II=RND 

100 LOCATE 9,7,0:PRINT ”T E T R A N”:PLA 

Y ”03 DO” 

110 ES=INKEY$:IF INSTRC” 12”,E$)>1 THEN 
EXIT 

120 LOCATE 9,7,0:PRINT ” ”:PLA 

Y ” 05 DO” 

130 I I=RND 
140 LOOP 

150 IF ES=”1” THEN RNFLAG%=1 ELSE RNFLAG 
%=0 

160 REM ** DISEGNA PLANCIA DI GIOCO ** 

170 CONSOLE,,,,1 

180 STX=21:STY=13:GOSUB 950 

190 STX=325:STY=85:GOSUB 950 

200 YA=1:XA=1 

210 DIM AX(4) , BXO , B(4,4) 

220 FOR T=1 TO 4:READ X:AX(T)=X:BX(T)=X+ 
38:NBXT 
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PROGRAMMI 


230 FOR T=1 TO 4:READ Y:AY(T)=Y:BY(T)=Y+ 
9 :NEXT 

240 DATA 4,11,18,25,3,6,9,12 

250 GSS=STRING$(4,CHRS(127))+STRINGS(4,C 

HRS(8) )+CHRS(10)+STRINGS(4,CHRS(127)) 

260 GPS=CHRS(9)+"\/"+STRINGS(3,CHRS (8) ) + 
CHRS (10) -f CHRS ( 9 ) + M / V 

270 SPS=" " +STR INGS (4, CHRS (8) ) +CHRS ( 1 
0)+" M 

280 LOCATE 0,15,0:ATTRB 1,0:PRINT "Àngol 
o: M ; :ATTRB 0,0:PRINT CHRS(127);CHRS(127 
);GRS(0): LOCATE 16, 16,0:PRINT GRS(0) 

290 LOCATE 0,17,0:ATTRB 1,0:PRINT "Lati: 

ATTRB 0,0:PRINT GRS(0);GRS(1);GRS( 


0 ) 

300 LOCATE 0,19,0:ATTRB 1,0:PRINT "Centr 
o: "; :ATTRB 0,0:PRINT GRS(1);CHRS(127);G 
RS(1):LOCATB 17,20,0 :PRINT GRS(0) 

310 REM ** INIZIAL IZZAZIONE GRIGLIA ** 
320 CL=0 

330 VE=INT(RND*8)+1:FOR J =1 TO VE*16:RE 
AD Q:NEXT 


340 FOR Xl = l TO 4 :FOR Yl=l TO 4 : READ Q: I 
F Q THEN LOCATE BX(XI)-1,BY(Y1)-1,0:B(XI 
,Yl)=l:PRINT GSS 
350 NEXT:NEXT 

360 IF RNFLAG%=1 THEN GOTO 400 

370 FOR Xl = l TO 4:FOR Yl=l TO 4 : READ Q: I 

F Q THEN LOCATE AX(XI)-1,AY(Y1)-1, 0 : A (XI 

,Y1)=1:PRINT GSS 

380 NEXT:NEXT 

390 GOTO 550 

400 FOR Xl=l TO 4;FOR Yl=l TO 4:H=RND:Q= 
-(H>.5):IF Q THEN LOCATE AX(XI)-1,AY(Y1) 
“1,0:PRINT GSS:A(X1,Yl)=l 
410 NBXT:NEXT 

420 DATA 1,1,1,1, 1,0,0,1,1,0,0,1, 1,1,1,1 
430 DATA 0,0, 0,0,0,1,1,0,0,1,1,0,0,0,0,0 
440 DATA 0,1, 1,0, 1,0,0,1,1,0,0,1,0,1, 1,0 
450 DATA 1,1, 1,1,1,1,1,1,1,1,1,1,1,1,1,1 
460 DATA 1,0, 0,1,0,1, 1,0,0,1,1,0,1,0,0,1 
470 DATA 1, 1, 1, 1,0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1 
480 DATA 1,0, 0, 1,0, 1, 1,0, 0, 1, 1,0, 1,0, 0, 1 
490 DATA 1,1,1,1, 0,0,0,0,0,0,0,0,1,1,1,1 
500 DATA 0,0,0,1, 0,0,0,1,0,0,0,1,0,0,0,1 
510 DATA 1,0,0,1,0,0, 0,0,0,0,0,0,1,0,0,1 
520 DATA 0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0 
530 DATA 0.0,0,0,1,0, 0,1, 1,0,0,1,0,0,0,0 
540 REM ** MOVIMENTO CURSORI ** 

550 LOCATE AX(XA)-1,AY(YA)-1,0 :PRINT GPS 
560 CL=CL+1:IF CL>=83 THEN CL=0:KL=KL+1: 
LOCATE 41,2,0:ATTRB 1,0: PRINT "Tempo:”; 
KL:LOCATE 41,4,0: PRINT "Mosse:";MO:ATTRB 
0, 0 


570 ES=INKEYS:IF ES=" M THEN GOTO 560 
580 IF ASC(ES)=22 THEN RUN 
590 IF INSTR(QS,ES)<>0 THEN E=ASC(ES) EL 
SE 570 

600 IF E=13 THEN GOSUB 730:GOSUB 900:MO= 
MO+1:ATTRB 1,0 : LOCATE 53,4,0: PRINT MO:AT 
TRB 0,0 

610 LOCATE AX(XA)-1,AY(YA)-1,0: IF A(XA,Y 
A)=0 THEN PRINT SPS ELSE PRINT GSS 


620 DX=-((-(E=8))+(E=9)):DY=-((-(E=ll)) + 
(E=10)) 

630 YA=YA+DY:IF YA=5 THEN YA=YA~4 
640 IF YA=0 THEN YA=YA+4 
650 XA=XA+DX:IF XA=5 THEN XA=XA-4 
660 IF XA=0 THEN XA=XA+4 

670 LOCATE AX(XA)-1,AY(YA)-1,0 :PRINT GPS 
680 GOTO 560 

690 REM ** INVERTE GRIGLIA ** 

700 LOCATE AX(XA)-1,AY(YA)-1,0: IF A(XA,Y 
A) THEN A(XA,YA)=0:PRINT SPS: RETURN ELSE 
PRINT GSS:A(XA,YA)=1 
710 RETURN 

720 REM ** DECIDE DIREZIONE ** 

730 IF (XA=YA) AND (<XA=4) OR (XA=1)) TH 
EN GOTO 790 

740 IF (XA+YA=5) AND (XA*YA=4) THEN GOTO 
790 

750 IF (XA>1 AND XA<4) AND (YA=1 OR YA=4 
) THEN GOTO 880 

760 IF (YA>1 AND YA<4) AND (XA=1 OR XA=4 

) THEN GOTO 870 

770 GOTO 890 

780 REM ** ANGOLI XX 

790 XT=XA:YT=YA:GOSUB 700:IF XA=1 THEN F 
OR XA=XT+1 TO XT+2:GOSUB 700:NEXT:XA=XT 
800 IF YA=1 THEN FOR YA=YT+1 TO YT+2:GOS 
UB 700:NEXT:YA=YT 

810 IF XA=4 THEN FOR XA=XT-2 TO XT-liGOS 
UB 700:NEXT:XA=XT 

820 IF YA=4 THEN FOR YA=YT-2 TO YT-l:GOS 
UB 700:NEXT:YA=YT 

830 IF XA=1 THEN XA=XT+1 ELSE XA=XT-1 
840 IF YA=1 THEN YA=YT+1 ELSE YA=YT-1 
850 GOSUB 700:XA=XT:YA=YT:RETURN 
860 REM XX LATI XX 

870 XT=XA:YT=YA:YA=YT-1:GOSUB 700:YA=YT+ 

1:GOSUB 700:YA=YT:XA=XT+(XT=4)-(XT=1):GO 

SUB 700:XA=XT:YA=YT:RETURN 

880 XT=XA:YT=YA:XA=XT-1:GOSUB 700:XA=XT+ 

1 :GOSUB 700:XA=XT:YA=YA+(YA=4)-(YA=1):GO 

SUB 700:XA=XT:YA=YT:RETURN 

890 XT=XA:YT=YA:GOSUB 700 :XA=XT+1:GOSUB 

700:XA=XT-1:GOSUB 700:XA=XT:YA=YT+1:GOSU 

B 700:YA=YT-1:GOSUB 700:YA=YT:RETURN 

900 FOR T=1 TO 4 :FOR Tl = l TO 4:IF A(T,T1 

)<>B(T,T1) THEN T=4:Tl=4: RETURN 

910 NEXT:NEXT 

920 SC=KL/16+MO/5:ATTRB 1,0:LOCATE 41,6, 
0:PRINT "Hai vinto!":LOCATE 41,7,0:PRINT 
"PENALITÀ’ :";INT(SC):LOCATE 41,8,0:FRI 
NT "Giochi ancora (S/N)?" 

930 ES=INPUTS(1) 

940 IF E$="S" THEN RUN ELSE CONSOLE ,,,, 
0: END 

950 REM XX GRIGLIE XX 

960 FOR T=STY TO STY+93 STEP 24:LINE(STX 
,T)-(STX+205,T): LINE (STX,T+21)-(STX+205 
,T+21):NEXT 

970 FOR T=STX TO STX+204 STEP 55:LINE(T, 
STY)-(T,STY+93):LI NE(T+40,STY)-(T+40,STY 
+93):NEXT 

980 RETURN ^ 
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PRODEST 



PROGRAMMI 


di GIOVANNI GOLINO, GIULIO VANNINI, ANGELO COCCETTINI 


MUSICA A 

icuramente qualcuno di voi si spaventerà vedendo 
la “mole” del listato di questo programma. Iniziamo 
dunque assicurandovi che questa volta vale davve¬ 
ro la pena di copiarlo, oppure di ordinarlo alla reda¬ 
zione. Infatti, quello che i vostri polpastrelli digiteran¬ 
no nelle prossime ore è un completo programma musicale, capace 
di far suonare il PC128 su tre canali audio contemporaneamente, 
ciascuno con il proprio timbro sonoro!. 

Inoltre esso rappresenta un vero e proprio toolkit, in quanto esten¬ 
de i comandi BASIC implementando nuove keywords come “suo¬ 
na", “registri”, eccetera, le quali potranno essere inserite a piaci¬ 
mento nei vostri programmi personali come i normali “print”, “go¬ 
to”, eccetera. 

Se a questo punto non vi siete ancora convinti che avere il PCI28 e 
non avere musica a tre voci è quasi come non avere il PCI28, non 
continuate a leggere. 

Veniamo all’uso del programma. Il listato principale non è altro che 
un caricatore L/M, che trasferisce in memoria il contenuto delle 
stringhe DATA. Una volta copiato attentamente il programma date 
il RUN. Se non avete commesso errori di battitura esso attiverà il 
toolkit dopo qualche minuto di lavoro. Abbiamo anche previsto un 
checksum per controllare gli errori nei DATA, quindi non vi preoc¬ 
cupate. Se il programma arriva alla fine senza segnalazioni strane, 
vuol dire che è tutto OK. A questo punto potete salvare su nastro i 
codici con: 

SAVEM “musica" 16384,21220,17591 

Il programma va naturalmente caricato ogni volta che si accende il 
computer e prima dei programmi che lo utilizzano. Ciò può essere 
fatto con il solito LOADM “musica”„R che tra l’altro attiva automa¬ 
ticamente la routine. Se preferite, potete usare il caricatore dei DA¬ 
TA ogni volta, anche se questo non è molto consigliabile a causa 
della sua lentezza. Comunque fate vobis. Non dimenticate però in 
questo caso di dare EXEC 17591, altrimenti il programma non fun¬ 
zionerà. 

Il RESET del computer non distrugge il generatore musicale, così 
come il NEW. Una volta finita la procedura di caricamento potete 
quindi caricare un programma qualsiasi, per esempio il nostro di¬ 
mostrativo, per verificare che tutto funzioni bene. Ascoltate e.... alli¬ 
bite!! Avete mai sentito niente di simile uscire dal vostro Prodest? 
Passiamo all’uso vero e proprio di musica a tre voci (M3V, per gli 
amici!). Le istruzioni aggiunte al normale set del PCI28 sono le se¬ 
guenti: 

METTI CANCELLA SUONA TEMPO REGISTRI 

Le analizzeremo una alla volta: 

- METTI 

Sintassi: METTI stringai,stringa2,stringa3 


PC 128 


Un bellissimo programma musica - 

le, capace di far suonare #7 computer su tre canali audio 


TRE VOCI 

Con “metti” potete inserire il brano musicale in memoria. Le strin¬ 
ghe possono anche essere delle variabili, e si riferiscono ciascuna 
ad un canale. Se non volete inserire niente in qualche canale, met¬ 
teteci una stringa nulla. Il comando METTI aggiunge i dati nell’ar¬ 
gomento a quelli precedentemente inseriti, se ci sono. Quindi può 
essere usato più volte. Le stringhe devono contenere le note in un 
formato simile a quello usato da PLAY. Le note sono sempre DO RE 
MI FA SO LA SI. Per il diesis ed il bemolle si scrive un od un “B” 
subito dopo la nota. La velocità, invece che “L”, si indica con “V” e 
si usa come con PLAY. Essa deve essere compresa tra 1 e 96, ed il 
valore di default è 48, corrispondente ad una minima. 96 corrispon¬ 
de ad una semibreve, 24 ad una semiminima, 12 ad una croma e 
così via. 

L’ottava si indica con “0” e può assumere valori tra 1 e 5. Il default 
è 3. Gli altri attributi di PLAY non si possono utilizzare. Esempio: 

METTI “V4801 DOREMI”,“V4803DOREMI”,“V4805DOREMI" 

fa suonare la sequenza “DOREMI" contemporaneamente su tre ot¬ 
tave diverse. 

- CANCELLA 
Sintassi: CANCELLA 

Serve per cancellare dalla memoria i dati relativi alla musica prece¬ 
dentemente inseriti. Non esiste alcun sistema di correzione, quindi 
per correggere un errore dovete per forza cancellare tutto. Una no¬ 
ta importante: il comando CANCELLA va usato ALMENO UNA 
VOLTA all’inizio della memorizzazione dei brani. Questo significa 
che se userete subito METTI il computer non suonerà niente. È 
quindi consigliabile porre CANCELLA tra le prime righe dei vostri 
programmi, in modo da evitare distrazioni. 

- SUONA 
Sintassi: SUONA 

Fa eseguire il brano inserito. È possibile interrompere l’esecuzione 
solo con il RESET. 

- TEMPO 

Sintassi: TEMPO numero 

Permette di variare la velocità di esecuzione. Può variare tra 0 e 11. 
Più il valore è alto, più la velocità aumenta. Il default è 5. Da notare 
che il tempo va settato prima di inserire il brano con METTI. Potete 
anche inserire un pezzo di brano, variare il tempo e continuare con 
il resto. Il comando TEMPO non ha alcun effetto dopo l’inserimento. 

- REGISTRI 

Sintassi: REGISTRI registrol ,registro2,registro3 
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PROGRAMMI 


Consente di variare il timbro di ciascuno dei tre canali disponibili. I 
parametri possono variare tra 0 e 10. Il valore 0 corrisponde a 
■spento”, per cui quello che è memorizzato nel corrispondente ca¬ 
nale non si sentirà. Gli altri numeri corrispondono a suoni tanto più 
aspri quanto più alto è il registro. 1 è equivalente al normale suono 
del PLAY. 

Prima di concludere, un ultimo trucchetto che può risultare molto 
utile. Poiché il programma memorizza le note nei banchi di memo¬ 
ria, riferendosi ad una variabile di sistema situata alla locazione 
&H218C (8588 decimale), è possibile memorizzare più di un brano 
cambiando i banchi di memoria. Supponete di avere inserito un 
motivo qualsiasi. Esso è stato memorizzato nel banco 6, che è il più 


1 rem ************************** 

2 REM * MUSICA A 3 VOCI * 

3 REM * PROGRAMMA DIMOSTRATIVO * 

4 REM ************************** 

IO TEMPO 5:CANCELLA: DO 

20 READ A$,BS,C$:IF AS="*”THBH BXIT 
30 METTI A$,BS,CS 
40 LOOP 

50 REGISTRI 1,1,2:SUORA 

60 DATA V4803MIV24REFA,V4802SI03RB,V4802 
SOV24FA#SI 

70 DATA MIV4802SIV24SI,V2402SI,V72SOV24P 
80 DATA O3SOV12SOSOV24FAV08LASOFA,V4803M 
IV24RE#V08REMIFA,V48SIV24LASI 
90 DATA V24SOV48MIV24MI,V24MI,SIV72SO 
100 DATA V48SIV24LASO,V48MIV24RB#MI,V48S 
ISI 

110 DATA V48SOV24FAV12MIMI, V48MIV24RB#MI 
.V2403D002SIBLASO 

120 DATA V3604D0V12D0V2403LAS0,V48DOMI,V 
48LA03DO 

130 DATA V72FAV2402SI,V72RB#,V7202SIV24P 
140 DATA 03MIV12MIMIV24REFA, V4802SI03RB, 
V48SGV24FA#SI 

150 DATA V72MIV2402SI,V2402MIV12MIFA#V24 
SOOISI,SOV12SOLAV24SISO 

160 DATA 03SOV12SOSOV24LAV12SOFA,V4803MI 
V24MIRE#,V48SILA 

170 DATA V24SOV72MI,MI,V24SIV12SOLAV24SI 
SO 

180 DATA V48SIV24LASO,V48MIV24RB#KI,V48S 

151 

190 DATA V72SOV12FAMI, V96MI, 03D002SIB 
200 DATA V48FAV24SOLA,V48RB#V24MIRB,SISI 
210 DATA V72SIV12MIMI,V72MI, V24SO#V12SOL 
AV48SI 

220 DATA V2404D0D003FAFA,V48MIV12RBMIFAR 
E,LALA 

230 DATA V12SISISISIV24MIMI, V24REREV12DO 
REMIDO,V24SOSOV48SO 

240 DATA LALARE#RE#, 1f *8D0V1202SI03D0RE02 
SI, V24FA#FA#FA#FA# 

250 DATA V12MIFASOLAV24SIMI,03RE#MIREV24 
MIMI,V48SIV12MIFA#V24SI 

260 DATA 04D0D003FAFA,V48MIV12REMIFARB,L 
ALALALA 

270 DATA SIV12SISIV24MIMI,V48REV12DORBMI 
DO, SOSOSOSO 

280 DATA LASOFAMI,,LASOFA#MI 

290 DATA MIRB#V48MI,V24D002SIV48SI,V72LA 

V24SO# 

300 DATA *,*,* 


alto. Ora basta battere POKE 8588,5 ed inserirne un altro. Quando 
vorrete tornare alla vecchia musica, ribattete POKE 8588,6 e poi 
SUONA. Vedrete, anzi, sentirete che il motivo non è stato assoluta- 
mente alterato. Una nota: se usate programmi lunghi farete meglio 
a riservare con CLEAR i banchi di memoria che intendete usare, al¬ 
trimenti rischierete che M3V distrugga il vostro programma memo¬ 
rizzando le note. 

Come avete visto, usare M3V non è difficile se si possiede qualche 
elementare cognizione musicale. La cosa più ardua è sincronizza¬ 
re i tre canali in fase di memorizzazione, ma se si dispone di uno 
spartito questo problema si riduce notevolmente. 


1 REM ***************************** 

2 REM * 

MUSICA A TRE VOCI 

* 

3 REM * 

BY 

* 

4 REM * GOLINO-VANNINI-COCCETTINI 

* 

5 REM * 

COPYRIGHT 1989 

* 

6 REM ***************************** 

10 CLS:X%= 

-&H4000: DO:C%=0:FOR I%=0 

TO 7: R 

EAD A$:IF 

AS="*" THEN EXIT 2 


20 A%=VAL 

”&H”+AS):C%=C%+A%:POKE X%+I%,A 

%:NEXT 1% 



30 READ D%: IF C%MOD256<>D% THEN PRINT”ER 

RORE 

NELLA LINEA” (X%-&H4000)/8*5+1000: EX 

IT ELSE LOCATE 0,22,0:PRINT “Locazioni”; 

X%i" 

—*• ; X%+7 ; ” OK” 


40 X%=X%+I% 


50 LOOP:EXEC &H44B7 


1000 

DATA 

4C, B7, A7, E5,39,7E, BF, 43, 

72 

1010 

DATA 

7E,B8,F4,BD,BA,A2,CE,44, 

85 

1020 

DATA 

F8,8D,OE,BD,BA,AO,CE,44, 

188 

1030 

DATA 

FA,8D,06,BD,BA,AO,CE,44, 

182 

1040 

DATA 

FC,8C,00,00,2C,02,20,DD, 

179 

1050 

DATA 

8C, 00, OB, 25, 02,20, F7, IF, 

244 

1060 

DATA 

10,58,86,80,3D,8E,46,00, 

127 

1070 

DATA 

30,8B,AF,C4,39,8E,51,00, 

70 

1080 

DATA 

BF, 44, E7,8E, 45, B4, BF, 44, 

116 

1090 

DATA 

F4,8E, 45, BA, BF, 44, F6, C6, 

64 

1100 

DATA 

01,F7,44,ED,17,02,71,7F, 

50 

1110 

DATA 

44.ED,8E.55,10,'BF.44,E7, 

14 

1120 

DATA 

8E, 45, B6,BF,44,F4,8E,45, 

83 

1130 

DATA 

BB, BF, 44, F6, 17, 02,59,8E, 

180 

1140 

DATA 

59,20,BF,44,E7,8E,45,B8, 

238 

1150 

DATA 

BF, 44, F4,8E, 45, BC, BF, 44, 

137 

1160 

DATA 

F6,17,02,44,8E,51,00,8D, 

191 

1170 

DATA 

1E,34,10,10,BF,45,BD,8E, 

193 

1180 

DATA 

55,10,8D,13,34,10,10,BF, 

24 

1190 

DATA 

45, BF, 8E,59,20,8D,08,34, 

212 

1200 

DATA 

10,10,BF,45,Cl,20,13,10, 

40 

1210 

DATA 

8E,00,00,EC,84,10,83,00, 

145 

1220 

DATA 

00,26,01,39,31,AB,30,04, 

112 

1230 

DATA 

20, FI, BE, 45, BD, BC, 45, BF, 

145 

1240 

DATA 

22,03, BE, 45,BF,BC,45,Cl, 

169 

1250 

DATA 

22,03,BE,45,Cl,34,10,FC, 

41 

1260 

DATA 

45,BD,43,53,C3,00,01,30, 

140 

1270 

DATA 

8B, AF, F8, 06, AE, 66, CC, 00, 

24 

1280 

DATA 

00,ED,02,ED,04,35,10,34, 

89 

1290 

DATA 

10,FC,45,BF,43,53,C3,00, 

105 

1300 

DATA 

01,30,8B,AF,F8,04,AE,64, 

121 

1310 

DATA 

CC,00,00,ED,02,ED,04,35, 

225 

1320 

DATA 

10, FC, 45, Cl, 43,53, C3, 00, 

107 

1330 

DATA 

01,30,8B,AF,F4,35,10,CC, 

112 

1340 

DATA 

00,00,ED,02,ED,04,35,30, 

69 

1350 

DATA 

BE,44,F2,BF,44,E7,8E,51, 

189 
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1360 

DATA 

00,CE,55,10,10,8E,59,20, 

74 

1370 

DATA 

B6,21,8C,BD,40,00,EC,84, 

208 

1380 

DATA 

10,83,00,00,10,27,00,9C, 

102 

1390 

DATA 

10, A3 , C4,25, 02, EC, C4 , 10, 

94 

1400 

DATA 

A3, A4,25, 02, EC, A4,34,06, 

56 

1410 

DATA 

34,10,BE,44,E7,86,5C,3D, 

76 

1420 

DATA 

ED,81,BF,44,E7,35,10,EC, 

137 

1430 

DATA 

02,ED,9F,44,E7,34,10,BE, 

187 

1440 

DATA 

44,E7,30,02,EC,42,ED,81, 

249 

1450 

DATA 

EC,22,ED,81,BF,44,E7,35, 

155 

1460 

DATA 

10, EC, 84, A3, E4, 10,83, 00, 

154 

1470 

DATA 

00,26, 09,30, 04, C6, 01, F7, 

33 

1480 

DATA 

44,EC,20,05,7F,44,EC,ED, 

241 

1490 

DATA 

84, EC, C4, A3, E4, 10,83, 00, 

78 

1500 

DATA 

00, 26, OC, 33,44, C6, 02, FB, 

108 

1510 

DATA 

44, EC, F7,44, EC, 20, 02, ED, 

102 

1520 

DATA 

C4,EC,A4,A3,E4,10,83,00, 

110 

1530 

DATA 

00,26,OC,31,24,C6,04,FB, 

76 

1540 

DATA 

44,EC,F7,44,EC,20,02,ED, 

102 

1550 

DATA 

A4,35, 06,34, 10, BE, 44, E7, 

12 

1560 

DATA 

F6,44,EC,E7,80,BF,44,E7, 

119 

1570 

DATA 

8C,9F,FC,10,24,02,5B,35, 

237 

1580 

DATA 

10,16,FF,5A,BE,44,E7,ED, 

85 

1590 

DATA 

84, BF, 44, F2, B6,21,1A, BD, 

39 

1600 

DATA 

40,00,39,B6,21,8C,BD,40, 

217 

1610 

DATA 

00,86, FE,B4,A7,C3,B7,A7, 

0 

1620 

DATA 

C3 , F6, A7, CI, C4 , F7, F7, A7, 

122 

1630 

DATA 

Cl,7F,A7,CF,CC,3F,04,B7, 

124 

1640 

DATA 

A7,CD,F7,A7,CF,1A,50,34, 

127 

1650 

DATA 

08,86,42,1F,8B,BE,44,F8, 

116 

1660 

DATA 

BF, 42, B7, BE, 44, FA, BF, 42, 

181 

1670 

DATA 

BA,BE,44,FC,BF,42,BD,8E, 

4 

1680 

DATA 

00,00,1F,13,1F,12,9F,C2, 

196 

1690 

DATA 

8E,60,00,EC,81,10,83,00, 

238 

1700 

DATA 

00,27,35,DD,85,EC,81,DD, 

8 

1710 

DATA 

89,EC,81,DD,94,EC,81,DD, 

177 

1720 

DATA 

9E,E6,80,B6,A7,CD,84,3F, 

241 

1730 

DATA 

80,05,81,3F,22,12,54,24, 

241 

1740 

DATA 

03,B7,A7,CD,54,24,03,B7, 

96 

1750 

DATA 

A7,CD,54,24,03,B7,A7,CD, 

26 

1760 

DATA 

9F,CO,20,17,9E,CO,20,C3, 

215 

1770 

DATA 

35, 08,86, 01, BA, A7, C3, B7, 

159 

1780 

DATA 

A7,C3,1C,AF,B6,21,1A,BD, 

227 

1790 

DATA 

40,00,39,9E,C2,10,DF,C6, 

142 

1800 

DATA 

10, DE,C4, 10, 8E,33,CO,32, 

117 

1810 

DATA 

E9,OD,80,10,DF,B8,E6,9F, 

162 

1820 

DATA 

42,B7,30,89, 11,03,9F,BB, 

32 

1830 

DATA 

EB,9F,42,BA,33,C9,14,3B, 

209 

1840 

DATA 

DF, BE, EB, 9F, 42, BD, F7, A7, 

196 

1850 

DATA 

CD,31,3F,26,DA,10,DF,C4, 

240 

1860 

DATA 

10,DE,C6,9F,C2,20,AD,47, 

41 

1870 

DATA 

9F,8C,50,51,40,50,78,40, 

20 

1880 

DATA 

60,1B,51,40,9F,8C,5F,FB, 

145 

1890 

DATA 

7D,44,ED,27,05,BD,BF,30, 

134 

1900 

DATA 

20, 03, BD, BF, 2E, F7,44, E9, 

241 

1910 

DATA 

BF,44,EA,5D,26,OB,FE,44, 

189 

1920 

DATA 

E7,8E,00,00,AF,Cl,AF,Cl, 

85 

1930 

DATA 

39,F6,44,E9,5D,26,02,20, 

1 

1940 

DATA 

ED,BE,44,EA,E6,84,Cl,56, 

90 

1950 

DATA 

26, 05,17,00,C7,20,EA,C1, 

212 

1960 

DATA 

4F,26,05,17,00,9C,20,E1, 

46 

1970 

DATA 

Cl.50,26,04,8D,7B,20,D9, 

60 

1980 

DATA 

10,AE,84,CE,44,FE,4F,10, 

177 

1990 

DATA 

AC,Cl,27,08,4C,81,07,26, 

150 

2000 

DATA 

F6,7E,40,08,F6,44,E9,Cl, 

160 

2010 

DATA 

02,27,18,E6,02,Cl,42,26, 

82 


2020 

DATA 

07, C6, 04, F7,44, EC, 20, OE, 

38 

2030 

DATA 

Cl,23,26,07,C6,02,F7,44, 

20 

2040 

DATA 

EC,20,03,7F,44,EC,34, 02, 

244 

2050 

DATA 

A6,9F,44,F6,C6,2A,3D, 8E, 

58 

2060 

DATA 

45,OC,30,8B,35,02,FE,44, 

133 

2070 

DATA 

EA,7D,44,EC,27,05,33,41, 

55 

2080 

DATA 

7A, 44, E9,33,42,7A,44,E9, 

195 

2090 

DATA 

7A, 44, E9, FF, 44, EA, C6, 06, 

160 

2100 

DATA 

3D,FB,44,EC,EE,85,BE,44, 

221 

2110 

DATA 

E7,10,AE,9F,44,F4,10,AF, 

59 

2120 

DATA 

81,EF,81,BF,44,E7,16,FF, 

240 

2130 

DATA 

60,30,01,BF,44,EA, BE, 44, 

128 

2140 

DATA 

E7,EE,9F,44,F4,EF,81,6F, 

139 

2150 

DATA 

80,6F,80,BF,44,E7,7A,44, 

23 

2160 

DATA 

E9,39,E6,01,CO,31,Cl, 00, 

187 

2170 

DATA 

2C,03,7E,40,05,Cl,03,2F, 

229 

218u 

DATA 

03,7E, 40, 05, E7,9F, 44, F6, 

134 

2190 

DATA 

30,02,BF,44,EA,7A,44,E9, 

198 

2200 

DATA 

7A, 44, E9,39,4F, E6, 01, CO, 

214 

2210 

DATA 

30,Cl,00,2C,03,7E,40,05, 

227 

2220 

DATA 

Cl,09,2F,03,7E,40,05,F7, 

182 

2230 

DATA 

44, EC, 4C, E6, 02, CO, 30, Cl, 

21 

2240 

DATA 

00,2D,18,Cl,09,2E,14,4C, 

157 

2250 

DATA 

34,06,F6,44,EC,86,OA,3D, 

45 

2260 

DATA 

F7,44, EC, 35, 06, FB, 44, EC, 

141 

2270 

DATA 

F7,44, EC, F6,44, EC, Cl, 00, 

14 

2280 

DATA 

26,03,7E,40,05,Cl,60,23, 

48 

2290 

DATA 

03,7E,40,05,BE,44,EA,4C, 

254 

2300 

DATA 

30,86, BF, 44, EA, 34, 02, B6, 

143 

2310 

DATA 

44 , E9,AO,E4,35,04,B7,44, 

229 

2320 

DATA 

E9,4F, F6,44,EC,ED,9F,44, 

46 

2330 

DATA 

F4,39,35,10,7F,9F,FC,7F, 

11 

2340 

DATA 

9F,FD,8E,44,D5,E6,80,3F, 

232 

2350 

DATA 

02,5D, 26, F9, 16, FB, C6,39, 

142 

2360 

DATA 

8E,60,00,BF,44,F2,B6,21, 

186 

2370 

DATA 

8C,BD,40,00,6F,84,6F,01, 

236 

2380 

DATA 

B6,21,1A,BD,40,00,39,BD, 

228 

2390 

DATA 

BA,A2,8C,00,OB,10,22,FB, 

32 

2400 

DATA 

A4,1F,10,86,14,3D,CB,20, 

149 

2410 

DATA 

F7,41,4E,39,00,00,00,00, 

191 

2420 

DATA 

53,55,4F,4E,Cl,43,41,4E, 

216 

2430 

DATA 

43,45,4C,4C,Cl,4D,45,54, 

199 

2440 

DATA 

54,C9,52,45,47,49,53,54, 

235 

2450 

DATA 

52,C9,54,45,4D,50,CF,00, 

32 

2460 

DATA 

00,00,00,00,00,00,00,00, 

0 

2470 

DATA 

00,00,00,00,80,8C,44,9C, 

236 

2480 

DATA 

26,F9,39,80,F9,81,04,22, 

120 

2490 

DATA 

OB,8E,44,CB,48,1F, 89,3A, 

210 

2500 

DATA 

9D,CO,6E,94,7E,40,08,C6, 

235 

2510 

DATA 

05,F7,27,7A,8E,44,70,BF, 

158 

2520 

DATA 

27,7B,8E,44,A3,BF, 27, 7D, 

122 

2530 

DATA 

39,00,00,41,E3,44,40,40, 

33 

2540 

DATA 

3D,40,OB,44,57,54,41,56, 

14 

2550 

DATA 

4F,4C,41,20,53,41,54,55, 

57 

2560 

DATA 

52,41,OD,OA,07,00,00,60, 

17 

2570 

DATA 

1B,00,23,31,07,00,4C,4C, 

14 

2580 

DATA 

4C,4C,60,1B,45,B8,45,BC, 

17 

2590 

DATA 

47,00,50,00,50,00,44,4F, 

122 

2600 

DATA 

52,45,4D,49,46,41,53,4F, 

86 

2610 

DATA 

4C,41,53,49,01,57,01,6B, 

237 

2620 

DATA 

02,87,01,81,01,98, 01,6B, 

16 

2630 

DATA 

01,BO,01,CA,01,98,01,CA, 

224 

2640 

DATA 

01, E5, 01, BO, 02, 02, 02,20, 

189 

2650 

DATA 

01,E5,02,41,02,63,02,20, 

176 

2660 

DATA 

02,87,01,57,02,63,02,AE, 

246 

2670 

DATA 

02, D7, 05, OF, 03,02, 03,30, 

37 

2680 

DATA 

02, D7, 03,60,03,93, 03,30, 

5 

2690 

DATA 

03, 93, 03, CA, 03,60, 04, 04, 

206 

2700 

DATA 

04,41,03, CA, 04,81,04, C6, 

97 

2710 

DATA 

04,41,05, OF, 02, AE, 04, C6, 

211 

2720 

DATA 

05,5C,05,AD,OA,1D,06,04, 

68 

2730 

DATA 

06,5F,05,AD,06,CO,07,27, 

11 


96 


134 
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3470 

DATA 

15, 15, 15, 15, 15, 15, 15, 15, 

168 

3480 

DATA 

00,00,00,00,00,00,00,00, 

0 

3490 

DATA 

00, 00, 00, 00, 00, 00, 00, 00, 

0 

3500 

DATA 

00, 00, 00,00,00, 00, 00, 00, 

0 

3510 

DATA 

00, 00, 00, 00, 00, 00, 00, 00, 

0 

3520 

DATA 

00, 00,00, 00, 00,00, 00, 00, 

0 

3530 

DATA 

00, 00,00, 00, 00, 00, 00, 00, 

0 

3540 

DATA 

00,00,00,00,00,00, 00, 00, 

0 

3550 

DATA 

00, 00, 00, 00. 00, 00,00,00, 

0 

3560 

DATA 

00,00,00,00,00,00,00,00, 

0 

3570 

DATA 

00,00,00.00,01,01,01,01, 

4 

3580 

DATA 

01,01,01,01,01,01,01,01, 

8 

3590 

DATA 

02,02, 02,02,02,02,02,02, 

16 

3600 

DATA 

02,02, 02,02,03,03,03,03, 

20 

3610 

DATA 

03, 03, 03, 03, 03, 03, 03,03, 

24 

3620 

DATA 

04,04 , 04,04,04,04, 04,04 , 

32 

3630 

DATA 

04,04,04,04,05, 05, 05, 05, 

36 

3640 

DATA 

05,05,05,05,05,05,05,05, 

40 

3650 

DATA 

06, 06 , 06,06, 06, 06, 06, 06, 

48 

3660 

DATA 

06, 06, 06, 06, 07,07 , 07,07 , 

52 

3670 

DATA 

07,07,07, 07,07, 07,07,07, 

56 

3680 

DATA 

08,08,08, 08, 08, 08, 08, 08, 

64 

3690 

DATA 

08,08, 08,08, 09, 09, 09, 09, 

68 

3700 

DATA 

09, 09, 09, 09, 09, 09, 09,09, 

72 

3710 

DATA 

0A, OA, OA,OA,OA,OA,OA,OA, 

80 

3720 

DATA 

OA,OA,OA,OA,OB,OB,OB,OB, 

84 

3730 

DATA 

OB, OB, OB,OB,OB,OB,OB,OB, 

88 

3740 

DATA 

OC, OC, OC, OC, OC, OC, OC, OC, 

96 

3750 

DATA 

OC,OC,OC,OC,OD,OD,OD,OD, 

100 

3760 

DATA 

OD, OD, OD,OD,OD,OD,OD,OD, 

104 

3770 

DATA 

OE, OE, OE, OE, OE, OE, OE, OE, 

112 

3780 

DATA 

OE, OE,OE,OE,OF,OF,OF,OF, 

116 

3790 

DATA 

OF,OF,OF,OF,OF,OF,OF,OF, 

120 

3800 

DATA 

10,10,10,10,10,10,10,10, 

128 

3810 

DATA 

10,10,10,10, 11, 11,11,11, 

132 

3820 

DATA 

11,11,11,11,11,11,11,11, 

136 

3830 

DATA 

12, 12, 12, 12, 12, 12, 12, 12, 

144 

3840 

DATA 

12,12,12,12,13,13,13,13, 

148 

3850 

DATA 

13, 13, 13, 13, 13, 13, 13, 13, 

152 

3860 

DATA 

14, 14, 14,14, 14,14, 14, 14, 

160 

3870 

DATA 

14, 14, 14, 14, 15, 15, 15, 15, 

164 

3880 

DATA 

00,00,00,00,00,00,01,01, 

2 

3890 

DATA 

01,01,01,01,02,02, 02, 02, 

12 

3900 

DATA 

02, 02,03, 03, 03, 03,03, 03, 

22 

3910 

DATA 

04,04,04,04,04,04,05,05, 

34 

3920 

DATA 

05, 05, 05, 05, 06, 06, 06, 06, 

44 

3930 

DATA 

06,06, 07, 07, 07, 07,07,07, 

54 

3940 

DATA 

08, 08, 08,08, 08, 08, 09, 09, 

66 

3950 

DATA 

09, 09, 09, 09, OA, OA, OA, OA, 

76 

3960 

DATA 

OA,OA,OB,OB,OB,OB,OB,OB, 

86 

3970 

DATA 

OC, OC, OC, OC, OC, OC, OD, OD, 

98 

3980 

DATA 

OD,OD,OD,OD,OE,OE,OE,OE, 

108 

3990 

DATA 

OE,OE,OF,OF,OF,OF,OF,OF, 

118 

4000 

DATA 

10, 10,10,10, 10,10,11,11, 

130 

4010 

DATA 

11, 11, 11, 11, 12, 12, 12, 12, 

140 

4020 

DATA 

12, 12, 13, 13, 13, 13, 13, 13, 

150 

4030 

DATA 

14, 14, 14, 14, 14, 14, 15, 15, 

162 

4040 

DATA 

15, 15, 14, 14, 14, 14, 14, 14, 

162 

4050 

DATA 

13, 13, 13, 13, 13, 13, 12, 12, 

150 

4060 

DATA 

12, 12, 12, 12, 11, 11, 11, 11, 

140 

4070 

DATA 

11,11,10,10,10,10,10,10, 

130 

4080 

DATA 

OF,OF,OF,OF,OF,OF,OE,OE, 

118 

4090 

DATA 

OE,OE,OE,OE,OD,OD,OD,OD, 

108 

4100 

DATA 

OD, OD,OC,OC,OC,OC,OC,OC, 

98 

4110 

DATA 

OB,OB,OB,OB,OB,OB,OA,OA, 

GG 

4120 

DATA 

OA,OA,OA,OA,09,09,09,09, 

76 

4130 

DATA 

09,09,08,08,08,08,08,08, 

66 

4140 

DATA 

07, 07, 07, 07, 07,07,06, 06, 

54 

4150 

DATA 

06, 06, 06, 06, 05, 05, 05, 05, 

44 

4160 

DATA 

05, 05, 04, 04,04,04,04, 04, 

34 

4170 

DATA 

03, 03, 03, 03, 03, 03, 02,02, 

22 

4180 

DATA 

02, 02, 02, 02, 01,01, 01, 01, 

12 

4190 

DATA 

01,01,00,00,00,00,00,00, 

2 


2740 

DATA 

06,5F, 07,27, 07,94, 06, CO, 

244 

2750 

DATA 

08, 07, 08,81,07,94,09,03, 

63 

2760 

DATA 

09,8C,08,81,OA,1D,05,5C, 

166 

2770 

DATA 

09,8C,OA,B7,OB,5A,14,3B, 

10 

2780 

DATA 

OC,07,OC,BE,OB,5A,OD,80, 

207 

2790 

DATA 

OE,4E,OC,BE,OE,4E,OF, 28, 

185 

2800 

DATA 

OD,80,10,OE,11,03,OF,28, 

246 

2810 

DATA 

12,06,13,18,11,03,14,3B, 

166 

2820 

DATA 

0A,B7,13,18,18,90,18,90, 

60 

2830 

DATA 

18,90, 03, 03, 03, 18,90, 18, 

113 

2840 

DATA 

90,18,90,4C,4C,4C,4C, 4C, 

180 

2850 

DATA 

4C,4C,4C,4C,4C,4C,4C,4C, 

96 

2860 

DATA 

4C,4C,4C,4C,4C,4C, 4C, 4C, 

96 

2870 

DATA 

4C,4C,4C,4C,4C,4C,4C,4C, 

96 

2880 

DATA 

4C,4C,4C,4C,4C,4C, 4C, 4C, 

96 

2890 

DATA 

4C,4C,4C,4C,4C,4C, 4C,4C, 

96 

2900 

DATA 

4C,4C,4C,4C,4C,4C,4C,4C, 

96 

2910 

DATA 

4C,4C,4C,4C,4C,4C, 4C, 4C, 

96 

2920 

DATA 

00, 00, 00, 00,00,00,00,00, 

0 

2930 

DATA 

00, 00,00,00,00,00,00,00, 

0 

2940 

DATA 

00, 00,00,00,00,00,00,00, 

0 

2950 

DATA 

00,00, 00, 00, 00, 00, 00, 00, 

0 

2960 

DATA 

00,00,00,00,00,00,00,00, 

0 

2970 

DATA 

00,00,00,00,00,00,00,00, 

0 

2980 

DATA 

00, 00, 00, 00,00, 00, 00, 00, 

0 

2990 

DATA 

00, 00, 00,00, 00, 00,00, 00, 

0 

3000 

DATA 

00, 00, 00,00,00,00,00,00, 

0 

3010 

DATA 

00,00,00,00,00,00,00,00, 

0 

3020 

DATA 

00,00,00,00,00,00,00,00, 

0 

3030 

DATA 

00,00,00,00,00,00,00,00, 

0 

3040 

DATA 

00, 00,00,00,00,00,00,00, 

0 

3050 

DATA 

00,00,00,00,00,00,00,00, 

0 

3060 

DATA 

00,00,00,00,00,00,00,00, 

0 

3070 

DATA 

00, 00, 00,00,00,00,00,00, 

0 

3080 

DATA 

00,00,00,00,00,00,00,00, 

0 

3090 

DATA 

00,00,00,00,00,00,00,00, 

0 

3100 

DATA 

00,00,00,00,00,00,00,00, 

0 

3110 

DATA 

00,00,00,00,00,00,00,00, 

0 

3120 

DATA 

00,00,00,00,00,00,00,00, 

0 

3130 

DATA 

00, 00,00,00,00,00,00,00, 

0 

3140 

DATA 

00,00,00,00,00,00,00,00, 

0 

3150 

DATA 

00, 00, 00, 00, 00, 00, 00,00, 

0 

3160 

DATA 

00,00,00,00,00,00,00,00, 

0 

3170 

DATA 

00, 00, 00, 00, 00, 00, 00, 00, 

0 

3180 

DATA 

00,00,00,00,00,00,00,00, 

0 

3190 

DATA 

00,00,00,00,00,00,00,00, 

0 

3200 

DATA 

00,00,00,00,00,00,00,00, 

0 

3210 

DATA 

00, 00,00,00,00,00,00,00, 

0 

3220 

DATA 

00,00,00,00,00,00,00,00, 

0 

3230 

DATA 

00, 00, 00,00, 00, 00, 00, 00, 

0 

3240 

DATA 

00, 00, 00,00, 00, 00, 00,00, 

0 

3250 

DATA 

00, 00, 00, 00, 00, 00, 00, 00, 

0 

3260 

DATA 

00,00,00,00,00,00,00,00, 

0 

3270 

DATA 

00, 00, 00, 00, 00, 00, 00, 00, 

0 

3280 

DATA 

00,00,00,00,00,00,00,00, 

0 

3290 

DATA 

00,00,00,00,00, 00, 00,00, 

0 

3300 

DATA 

00,00,00,00,00,00,00,00, 

0 

3310 

DATA 

00, 00, 00,00, 00, 00,00,00, 

0 

3320 

DATA 

15, 15, 15, 15, 15, 15, 15, 15, 

168 

3330 

DATA 

15, 15, 15, 15, 15. 15, 15, 15, 

168 

3340 

DATA 

15, 15,15, 15, 15, 15, 15, 15, 

168 

3350 

DATA 

15,15, 15, 15, 15, 15, 15, 15, 

168 

3360 

DATA 

15, 15, 15, 15, 15, 15, 15, 15, 

168 

3370 

DATA 

15, 15, 15, 15, 15, 15, 15, 15, 

168 

3380 

DATA 

15, 15, 15, 15, 15, 15, 15, 15, 

168 

3390 

DATA 

15, 15, 15, 15, 15, 15, 15, 15, 

168 

3400 

DATA 

15, 15, 15, 15, 15, 15, 15, 15, 

168 

3410 

DATA 

15, 15, 15, 15, 15, 15, 15, 15, 

168 

3420 

DATA 

15, 15, 15, 15, 15, 15, 15, 15, 

168 

3430 

DATA 

15, 15, 15, 15, 15, 15, 15, 15, 

168 

3440 

DATA 

15, 15, 15, 15, 15, 15, 15, 15, 

168 

3450 

DATA 

15, 15, 15, 15, 15, 15, 15, 15, 

168 

3460 

DATA 

15, 15, 15, 15, 15, 15, 15, 15, 

168 
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4200 

DATA 

00,00,00,00,00,00,00,00, 

0 

4210 

DATA 

00,00,00,00,00,00,00,00, 

0 

4220 

DATA 

01,01,01,01,01,01,01,01, 

3 

4230 

DATA 

02,02,02,02,02,02,02,03, 

17 

4240 

DATA 

03, 03, 03, 03, 04, 04, 04, 04, 

28 

4250 

DATA 

04, 05, 05, 05, 05, 06, 06, 06, 

42 

4260 

DATA 

06, 07, 07, 07, 07, 08, 08, 08, 

58 

4270 

DATA 

08, 09, 09, 09, 09, OA, OA, OA, 

74 

4280 

DATA 

OA,OB,OB,OB,OB,OC,OC,OC, 

90 

4290 

DATA 

OC,OD,OD,OD,OD,OE,OE,OE, 

106 

4300 

DATA 

OE,OF,OF,OF,OF,10,10,10, 

122 

4310 

DATA 

10,10,11,11,11,11,11,12, 

135 

4320 

DATA 

12, 12, 12, 12, 12, 13, 13, 13, 

147 

4330 

DATA 

13, 13, 13, 13, 14, 14, 14, 14, 

156 

4340 

DATA 

14, 14, 14, 14, 14, 14, 14, 14, 

160 

4350 

DATA 

15, 15, 15, 15, 15, 15, 15, 15, 

168 

4360 

DATA 

15, 15, 15, 15, 15, 15, 15, 15, 

168 

4370 

DATA 

14,14, 14,14,14, 14,14, 14, 

160 

4380 

DATA 

14, 14, 14, 14, 13, 13, 13, 13, 

156 

4390 

DATA 

13, 13, 13, 12, 12, 12, 12, 12, 

147 

4400 

DATA 

12,11,11,11,11,11,10,10, 

135 

4410 

DATA 

10, 10, 10, OF, OF, OF, OF, OE, 

122 

4420 

DATA 

OE,OE,OE,OD,OD,OD,OD,OC, 

106 

4430 

DATA 

OC,OC,OC,OB,OB,OB,OB,OA, 

90 

4440 

DATA 

OA, OA, OA, 09,09,09, 09, 08, 

74 

4450 

DATA 

08,08,08,07,07,07,07,06, 

58 

4460 

DATA 

06, 06, 06, 05, 05, 05, 05, 04, 

42 

4470 

DATA 

04, 04, 04,04,03, 03, 03, 03, 

28 

4480 

DATA 

03,02,02,02,02,02,02,02, 

17 

4490 

DATA 

01,01,01,01,01,01,01,01, 

8 

4500 

DATA 

00,00,00,00,00,00,00,00, 

0 

4510 

DATA 

00,00,00,00,00,00,00,00, 

0 

4520 

DATA 

00,00,00,00,00,00,00,00, 

0 

4530 

DATA 

00,00,00,01,01,01,01,01, 

5 

4540 

DATA 

02, 02, 02,02, 03, 03, 03, 04 , 

21 

4550 

DATA 

04, 04,04,05, 05, 05, 06,06, 

39 

4560 

DATA 

07,07, 07,08, 08, 08, 09, 09, 

63 

4570 

DATA 

09,OA,OA,OA,OB,OB,OB,OC, 

84 

4580 

DATA 

OC,OC,OC,OD,OD,OD,OE,OE, 

103 

4590 

DATA 

OE,OE,OE,OF,OF,OF,OF,OF, 

117 

4600 

DATA 

OF,10,10,10,10,10,10,10, 

127 

4610 

DATA 

10 , 10 , 10 , 10 , 10 , 10 , 10 , 10 , 

128 

4620 

DATA 

10,10,10,10,10,10,OF,OF, 

126 

4630 

DATA 

OF,OF,OF,OF,OE,OE,OE,OE, 

116 

4640 

DATA 

OE,OE,OD,OD,OD,OD,OD,OD, 

106 

4650 

DATA 

OC, OC, OC, OC, OC, OC, OB, OB, 

94 

4660 

DATA 

OB,OB,OB,OB,OB,OB, OB, OA, 

87 

4670 

DATA 

OA, OA, OA,OA,OA,OA,OA,OA, 

80 

4680 

DATA 

OA,OA,OA,OA,OA,OA,OA,OA, 

80 

4690 

DATA 

OA,OA,OB,OB,OB,OB, OB, OB, 

86 

4700 

DATA 

OB, OB, OC, OC, OC, OC, OC, OC, 

.94 

4710 

DATA 

OD,OD,OD,OD,OD,OD,OE,OE, 

106 

4720 

DATA 

OE,OE,OE,OE,OE,OF,OF,OF, 

115 

4730 

DATA 

OF,OF,OF,OF,10,10,10,10, 

124 

4740 

DATA 

10 , 10 , 10 , 10 , 10 , 10 , 10 , 10 , 

128 

4750 

DATA 

10,10,10,10,10,10,10,OF, 

127 

4760 

DATA 

OF,OF,OF,OF,OF,OE,OE,OE, 

117 

4770 

DATA 

OE,OE,OD,OD,OD,OD,OC,OC, 

104 

4780 

DATA 

OC, OC, OB, OB, OA, OA, OA, 09, 

35 

4790 

DATA 

09, 09,08, 08, 08, 07,07, 07, 

63 

4800 

DATA 

06,06,06,05,05,05,04,04, 

41 

4810 

DATA 

04,03,03,03,03,02,02,02, 

22 

4820 

DATA 

01,01,01,01,01,00,00,00, 

5 

4830 

DATA 

00, 00,00,00,00,00,00,00, 

0 

4840 

DATA 

00,00,00,00,00,00,00,00, 

0 


4850 

DATA 

01, 01,01,01,02,02,03,03, 

14 

4860 

DATA 

03,04,04,05, 05, 05, 06, 06, 

38 

4870 

DATA 

07, 07,08,08, 09, 09, 09, OA, 

67 

4880 

DATA 

OA,OB,OB,OB,OC,OC,OC,OC, 

91 

4890 

DATA 

OC,OD,OD,OD,OD,OD,OD,OD, 

103 

4900 

DATA 

OD, OD, OD,OD,OD,OD,OC,OC, 

102 

4910 

DATA 

OC,OC,OC,OB,OB,OB,OB,OA, 

90 

4920 

DATA 

OA,OA,OA,09,09,09,09,08, 

74 

4930 

DATA 

08, 08, 08, 08, 08, 08, 07,07, 

62 

4940 

DATA 

07, 07, 07, 07, 07, 08,08, 08, 

59 

4950 

DATA 

08, 08,08,09,09,09,09,OA, 

70 

4960 

DATA 

OA, OB, OB,OB,OC,OC,OD,OD, 

93 

4970 

DATA 

OE,OE» OF,OF,OF,10,10,11, 

122 

4980 

DATA 

11, 11, 12, 12, 13, 13, 13, 13, 

146 

4990 

DATA 

14,14,14,14,14,14,15,15, 

162 

5000 

DATA 

15, 15, 15, 14, 14, 14, 14, 14, 

163 

5010 

DATA 

14, 13, 13, 13, 12, 12, 12, 11, 

148 

5020 

DATA 

11,10,10,10,OF,OF,OE,OE, 

123 

5030 

DATA 

OD,OD,OD,OC,OC,OB,OB,OA, 

95 

5040 

DATA 

05, OA, 09,09, 09, 09, 08, 08, 

67 

5050 

DATA 

08. 08,08, 07, 07, 07, 07, 07, 

59 

5060 

DATA 

07, 07, 07, 07,07,08, 08, 08, 

59 

5070 

DATA 

08, 08, 09,09, 09, 09, OA, OA, 

72 

5080 

DATA 

OA,OA,OB,OB,OB,OB,OC,OC, 

88 

5090 

DATA 

OC,OC,OC,OD,OD,OD,OD,OD, 

101 

5100 

DATA 

OD,OD,OD,OD,OD,OD,OD,OC, 

103 

5110 

DATA 

OC,OC,OC,OC,OB,OB,OB,OA, 

91 

5120 

DATA 

OA, OA, 09,09,08,08,08,07, 

69 

5130 

DATA 

07,06,06,05,05,04,04,04, 

41 

5140 

DATA 

03, 03, 02,02, 02,01,01,01, 

15 

5150 

DATA 

01,00,00,00,00,00,00,00, 

1 

5160 

DATA 

00,00,00,00,00,00,01,01, 

2 

5170 

DATA 

01,02,02, 03,03, 04, 04,05, 

24 

5180 

DATA 

05, 06, 06, 07, 08, 08, 09, 09, 

58 

5190 

DATA 

OA,OA,OA,OB,OB,OB,OB,OC, 

86 

5200 

DATA 

OC,OC,OC,OC,OC,OC,OB,OB, 

94 

5210 

DATA 

OB,OB,OA.OA,OA,09,09,08, 

78 

5220 

DATA 

08, 08, 07,07,07,06, 06 , 06, 

55 

5230 

DATA 

05,05,05,05,05,05,05,05, 

40 

5240 

DATA 

05, 05, 05, 05, 06, 06,07, 07, 

46 

5250 

DATA 

08,08,09,09,OA,OA.OB,OC, 

77 

5260 

DATA 

OC,OD,OE,OE,OF,OF,10,10, 

115 

5270 

DATA 

11, 11, 12, 12, 12, 13, 13, 13, 

145 

5280 

DATA 

13, 13, 13, 13, 13, 13, 13, 13, 

152 

5290 

DATA 

12, 12, 12, 11, 11, 10, 10, OF, 

135 

5300 

DATA 

OF,OE,OE,OE,OD,OD,OC,OC, 

107 

5310 

DATA 

OC,OB,OB,OB,OA,OA,OA,OA, 

85 

5320 

DATA 

OA,OA,OA,OA,OB,OB,OB,OB, 

84 

5330 

DATA 

OC,OC,OC,OD,OD,OE,OE,OF, 

105 

5340 

DATA 

OF,OF,10,10,11,11,12,12, 

132 

5350 

DATA 

12, 12, 13, 13, 13, 13, 13, 13, 

150 

5360 

DATA 

13, 13, 13, 13, 12, 12, 12, 11, 

147 

5370 

DATA 

11,10,10,OF,OE,OE,OD,OD, 

118 

5380 

DATA 

OC, OB, OB, OA, 09, 09, 08,08, 

78 

5390 

DATA 

07, 07, 06, 06, 06, 05, 05, 05, 

47 

5400 

DATA 

05,05,05,05,05,05,05,05, 

40 

5410 

DATA 

05,06, 06,06, 07,07, 07, 08, 

52 

5420 

DATA 

08, 09, 09, 09, OA, OA, OA, OB, 

76 

5430 

DATA 

OB, OB,OB,OC,OC,OC,OC,OC, 

93 

5440 

DATA 

OC,OB,OB,OB,OB,OA,OA,OA, 

86 

5450 

DATA 

09, 09,08,08,07,07,06,06, 

60 

5460 

DATA 

05, 05, 04, 03, 03, 02, 02,02, 

26 

5470 

DATA 

01,01,00,00,00,00,00,00, 

2 

5480 

DATA 

00, 00, 00,00,00,01,01,02, 

4 

5490 

DATA 

02, 03, 03, 04,05, 05, 06,07, 

35 

5500 

DATA 

07,08, 09, 09, OA, OA, OA, OB, 

74 

5510 

DATA 

OB,OB,OB,OB,OB,OB,OB,OA, 

87 

5520 

DATA 

OA, OA, 09,09, 08,08, 07, 07, 

68 

5530 

DATA 

06,06, 05, 05, 04,04,04,03, 

37 

5540 

DATA 

03, 03, 03, 03, 03, 04, 04,04, 

27 

5550 

DATA 

05, 05, 06, 07, 07, 08,09, 09, 

56 

5560 

DATA 

OA, OB,OC,OC,OD,OE,OF,OF, 

102 

5570 

DATA 

10,10,10,11,11,11,11,11, 

133 


98 


136 
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5580 

DATA 

11,11,11,10,10,10,OF,OF, 

129 

5590 

DATA 

OE,OE,OD,OC,OC,OC,OB,OB, 

99 

5600 

DATA 

OA, OA, 09,09, 09, 09, 09, 09, 

74 

5610 

DATA 

09,OA,OA,OA,OB,OB,OC,OC, 

85 

5620 

DATA 

OD,OE,OE,OF,10,10,11,12, 

123 

5630 

DATA 

12, 13, 13, 14, 14, 14, 14,15, 

157 

5640 

DATA 

15, 15, 14, 14, 14, 14, 13, 13, 

160 

5650 

DATA 

12, 12, 11, 10, 10, OF, OE, OE, 

128 

5660 

DATA 

OD,OC,OC,OB,OB,OA,OA,09, 

88 

5670 

DATA 

09, 09, 09, 09, 09, 09, OA, OA, 

74 

5680 

DATA 

OA,OB,OB,OB,OC,OD,OD,OE, 

95 

5690 

DATA 

OE,OF,OF,10,10,10,11,11, 

126 

5700 

DATA 

11,11,11,11,11,11,10,10, 

134 

5710 

DATA 

OF,OF,OE,OE,OD,OC,OC,OB, 

106 

5720 

DATA 

OA, 09, 09, 08, 07, 06, 06, 05, 

60 

5730 

DATA 

05, 04,04,04,03, 03,03, 03, 

29 

5740 

DATA 

03, 03,04,04,04,05, 05, 06, 

34 

5750 

DATA 

06,07, 07,08, 08, 09, 09, OA, 

64 

5760 

DATA 

OA,OA,OB,OB,OB,OB, OB, OB, 

86 

5770 

DATA 

OB, OB,OA,OA,OA,09,08,08, 

77 

5780 

DATA 

07,07,06, 05, 04,04, 03, 03, 

39 

5790 

DATA 

02,01,01,01,00, 00, 00,00, 

5 

5800 

DATA 

00,00,00,00,01,01,02,02, 

6 

5810 

DATA 

03, 04,05, 05, 06, 07,08,08, 

46 

5820 

DATA 

09,OA,OA,OA,OB,OB,OB,OB, 

83 

5830 

DATA 

OB,OA,OA,OA,09,08,08,07, 

73 

5840 

DATA 

06, 06, 05, 04,04, 03, 03, 03, 

34 

5850 

DATA 

02, 02,02,02,03, 03, 03,04 , 

21 

5860 

DATA 

05, 05, 06, 07, 08, 09, 09, OA, 

59 

5870 

DATA 

OB,OC,OD,OD,OE,OF,OF,OF, 

108 

5880 

DATA 

OF,10,10,OF,OF,OF,OE,OE, 

120 

5890 

DATA 

OD,OD,OC,OB,OB,OA,09,09, 

88 

5900 

DATA 

08,08, 08, 08, 08, 08, 08, 08, 

64 

5910 

DATA 

08,09,09,OA,OB,OC,OC,OD, 

84 

5920 

DATA 

OE, OF, 10, 11, 11, 12, 12, 13, 

134 

5930 

DATA 

13, 14, 14, 14, 14, 14, 13, 13, 

157 

5940 

DATA 

13,12,11,11,10,OF,OF,OE, 

131 

5950 

DATA 

OD,OD,OC,OB,OB,OB,OA,OA, 

91 

5960 

DATA 

OA, OA, OA, OB,OB,OB,OC,OD, 

88 

5970 

DATA 

OD,OE,OF,10,10,11,12,12, 

127 

5980 

DATA 

13, 13, 14,14,14, 14, 14,14, 

158 

59 oo 

DATA 

13, 13, 12, 12, 11, 10, OF, OF, 

137 

6000 

DATA 

OE,OD,OC,OB,OA,OA,09,09, 

88 

6010 

DATA 

08, 08, 08, 07,07, 08,08, 08, 

62 

6020 

DATA 

08,09, 09, OA, OB, OB, OC, OD, 

83 

6030 

DATA 

OD,OE,OE,OF,OF,OF,OF,OF, 

116 

6040 

DATA 

OF, OF, OF,OE,OE,OD,OD,OC, 

111 

6050 

DATA 

OB, OA, 09,08, 07, 07,06,05, 

63 

6060 

DATA 

04,04,03, 03, 02, 02,02,02, 

22 

6070 

DATA 

02, 03, 03, 03, 04,05, 05, 06, 

31 

6080 

DATA 

06, 07,08, 08, 09, 09, OA, OA, 

67 

6090 

DATA 

OB,OB,OB,OB,OB,OA,OA,OA, 

85 

6100 

DATA 

09 , 08, 08, 07,06, 05, 04,04 , 

51 

6110 

DATA 

03, 02,01,01,00, 00, 00, 00, 

7 

6120 

DATA 

00, 00, 00, 00, 01 ,01,02,03, 

7 

6130 

DATA 

04, 05, 06,07,08,08,09,OA, 

57 

6140 

DATA 

OA,OA,OB,OB,OB,OA,OA,09, 

82 

6150 

DATA 

09,08,07,06,05,05,04,03, 

47 

6160 

DATA 

03, 02, 02, 02, 02, 02, 02, 02, 

17 

6170 

DATA 

03, 04,04,05, 06, 07, 08, 09, 

46 

6180 

DATA 

OA, OB, OC, OD, OD, OE, OE, OE, 

101 

6190 

DATA 

OE,OE,OE,OD,OD,OC,OC,OB, 

103 

6200 

DATA 

OA, 09, 09, 08, 07,07,06,06, 

62 

6210 

DATA 

06, 06, 06, 07, 07,08,09, 09, 

58 

6220 

DATA 

OA, OB, OC, OD, OE, OF, 10, 11, 

108 

6230 

DATA 

12, 12, 12, 13, 13, 13, 12, 12, 

147 

6240 

DATA 

12, 11, 10, 10,OF,OE,OD,OC, 

121 

6250 

DATA 

OC,OB,OA,OA,OA,OA,OA,OA, 

83 

6260 

DATA 

OA,OB,OB,OC,OD,OE,OE,OF, 

100 

6270 

DATA 

10,11,12,13,13,14,14,15, 

150 

6280 

DATA 

15, 15, 14, 14, 13, 13, 12, 11, 

155 

6290 

DATA 

10,OF,OE,OD,OD,OC,OB,OB, 

105 

6300 

DATA 

OA,OA,OA,OA,OA,OA,OA,OB, 

81 


6310 

dat£ 

6320 

DATA 

6330 

DATA 

6340 

DATA 

6350 

DATA 

6360 

DATA 

6370 

DATA 

6380 

DATA 

6390 

DATA 

6400 

DATA 

6410 

DATA 

6420 

DATA 

6430 

DATA 

6440 

DATA 

6450 

DATA 

6460 

DATA 

6470 

DATA 

6480 

DATA 

6490 

DATA 

6500 

DATA 

6510 

DATA 

6520 

DATA 

6530 

DATA 

6540 

DATA 

6550 

DATA 

6560 

DATA 

6570 

DATA 

6580 

DATA 

6590 

DATA 

6600 

DATA 

6610 

DATA 

6620 

DATA 

6630 

DATA 

6640 

DATA 

6650 

DATA 

6660 

DATA 

6670 

DATA 

6680 

DATA 

6690 

DATA 

6700 

DATA 

6710 

DATA 

6720 

DATA 

6730 

DATA 

6740 

DATA 

6750 

DATA 

6760 

DATA 

6770 

DATA 

6780 

DATA 

6790 

DATA 

6800 

DATA 

6810 

DATA 

6820 

DATA 

6830 

DATA 

6840 

DATA 

6850 

DATA 

6860 

DATA 

6870 

DATA 

6880 

DATA 

6890 

DATA 

6900 

DATA 

6910 

DATA 

6920 

DATA 

6930 

DATA 

6940 

DATA 

6950 

DATA 

6960 

DATA 

6970 

DATA 

6980 

DATA 

6990 

DATA 

7000 

DATA 

7010 

DATA 

7020 

DATA 

7030 

DATA 


OC,OC,OD,OE, 
12, 12, 12, 13, 
11, 11, IO,OF, 
OA,09,08,07, 
06, 06,06, 07, 
OA,OB,OC,OC, 
OE,OE,OE,OE, 
OA, 09,08,07, 
03,02,02,02, 
03,03,04,05, 
09,09, OA, OA, 
OA,OA,09,08, 
04,03,02,01, 
18,90,OD,80, 
00,00,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C, 4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C, 4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C,4C, 
4C,4C,4C, 4C, 
4C,4C,4C,4C, 
F6,AO,00,Cl, 
34,7F,10,FF, 
1F,8B,CE,AO, 
96,4E,03,4E, 
86,60,1F,8B, 
E7, DO, CC, 00, 
40,97,48,AD, 
83,4D,54,27, 
44,10,27,00, 
41, A7,02,CC, 
E7,01,86,01, 
A7,04,86,Al, 
C6,1B,E7,84, 
75,00,31,3F, 
C5, 02,27, F6, 
30,E6,84,2A, 

FB, 26,F3,10, 
84,2A,FC,E6, 
F6,10,8E,00, 

FC, E6,03,Cl, 
3F,26,F2,6F, 
FF,34,76,20, 
84,8D,1D,1A, 
84,85,02,27, 
F7,26,F2,5A, 
35,FF,85,01, 
8D,04,8D,02, 
01,D7,48,6E, 


OF,OF,10,11 
13,13, 12, 12 
OE,OD,OC,OB 
07,06,06,06 
07,08,09,09 
OD,OD,OE,OE 
OD,OC,OC,OB 
06, 05, 04,03 
01,02,02,02 
06,06,07,08 
OB,OB,OB,OA 
07, 07, 06, 05 
01,00,00,00 
00,00,00,00 
4C,4C,4C,4C 
4C,4C,4C,4C 
4C,4C,4C, 4C 
4C,4C,4C, 4C 
4C,4C,4C, 4C 
4C,4C,4C, 4C 
4C,4C,4C, 4C 
4C,4C,4C,4C 
4C,4C,4C, 4C 
4C,4C,4C,4C 
4C,4C,4C,4C 
4C,4C,4C,4C 
4C,4C,4C,4C 
4C,4C,4C,4C 
4C,4C,4C,4C 
4C,4C,4C,4C 
4C,4C,4C,4C 
4C,4C,4C, 4C 
4C,4C,4C,4C 
4C,4C,4C,4C 
4C,4C,4C, 4C 
4C,4C,4C, 4C 
4C,4C,4C, 4C 
4C,4C,4C,4C 
4C,4C,4C, 4C 
4C,4C,4C, 4C 
4C,4C,4C, 4C 
4C,4C,4C, 4C 
4C,4C,4C,4C 
4C,4C,4C,4C 
4C,4C,4C,4C 
9F,26,01,39 
27,A8,86,20 
00,8E,A7,DO 
91,4E,26,OA 
CE,EO,00,8E 
4F,DD,4A,86 
44,EC,C4,10 
OA,A6,42,81 
68,20,62,86 
1F,22,A7,07 
A7,05,86, OA 
A7,03,1A,50 
86,04,10,8E 
27,3B,E6,84 
E6,03,4A,27 
FC,E6,03,Cl 
8E,01,02,E6 
03,31,3F,26 
04,E6,84,2A 
F7,26,OA,31 
84,8D,30,35 
FC, 86,EO,A7 
50,C6,OA,A6 
OD,A6,03,81 
26,FI,8D,OF 
26, E9,20,D9 
8D,00,39,C6 
44,44,* 


114 
147 

115 

59 
58 
99 
104 

52 
16 
42 
81 
62 
11 

53 
200 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
96 
86 
55 
29 
68 
204 
127 
208 
190 
235 
165 
171 
230 

116 
177 
62 
106 
155 
41 
44 
254 

60 
210 
14 


105 

28 

194 

172 
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PROGRAMMI 

Commodore 

Provate la vostra abilità balistica. 

64 


da esperti di catapulta quali siete, per abbattere le difese di un ca¬ 
stello medioevale, che si difenderà da voi ... spostandosi (provare 
di MARCO VALERI per credere) 


Assedio ai 
Castello 


I programma che vi proponiamo questa volta ci sem¬ 
bra proprio grazioso ed interessante. Dopo la con¬ 
sueta videata di presentazione, agli occhi esterrefatti 
del giocatore, impaziente di iniziare il game, appare 
una inconsueta arcaica, medioevale scenografia: 
una catapulta ed un vecchio castello. 

Il gioco consiste nel colpire il suddetto castello che in modo casua¬ 


le si avvicina o si allontana dalla sorgente dei colpi. Ed è per questo 
che ogni volta è necessario cambiare i parametri della traiettoria 
dei proiettili. 

Il giocatore ha a sua disposizione 5 colpi per distruggere l’obiettivo 
ed alla fine, a seconda della bravura, totalizzerà un punteggio più o 
meno alto. Ai pigri farà piacere sapere che il listato è brevissimo e 
quindi non dovranno faticare molto per digitarlo. 



100 PRTMT-M.XM ASSEDIO AL CAS 

TELLO ■" ; 

105 PRim-'UI 


110 PRINT'MI 


DI 


115 PRINT" 
120 PRINT aa 


MARCO VALERI 
" :F=6:Q=RND <TI)* 16+1876 


125 DATA000,091,039,127,040,241,041,255 
130 DATA076,127,077,241,078,255,080,194 
135 DATAI 17,194,118,160,119,251,120,160 
140 FORJ=0TO11:READL,M:POKEQ+L,M:NEXT 
145 PQKE53281,0 :S=54296:V=53248:POKE2040 
,13: POKE832,128:POKEV +29,1:P0KEV+39,1 
150 IFF= 1THENPR HTT’jnM FINE DEL Gl 
OCO ! GUADAGNI ■" ; H ; aa »>UNT I HI' : GOTO200 
155 POKEV +21,0 2POKE1985,105:POKE1986 ,95 : 
POKE 1945 ,70 : X=33 : Y=230 : G =0 : F =F - 1 
160 PR INT aa MHH" 


100 


138 


165 PRINT a, a:OLPI DA SPARARE®** ; F 

166 POKE19,1 

167 INPUT" «TRAI ETTORI A <1-88> ";D:PRINT 

168 POKE19,0 

170 IFD<10RD >88THEN165 

175 R = */<180/D):A=TAN<R>:B=3.3*C0S<R): PO 
KE1945,77:POKEV+21,1 :POKES,15 :POKES,0 
180 X=X+B:Y=Y-<B*A)+G:G=G+.05:IFX>2550RY 
>250THENFORJ=0TO999: hCXT:GOTO 150 
185 POKEV,X :POKEV+1,Y 

190 IFPEEK <V+31) = 1THENPOKE1024+INT<CY-50 
)/8)<40 + INT < < X-24 >/8 >,32 :H =H +1 :POKES,15 
195 POKES,0:GOTO 180 
200 FORA*1TO2000 S NEXT 

205 PRINT"^JM VUOI GIOCARE ANCORA 

<S/N>?" 

210 GETA*:IFLEN<A*>=0THEN210 
215 IFA*< >"S"ANDA*< >"N"THEN205 
220 IFA**"S"THEM?UN 
225 IFA$="N"THEN*R INT aa J* :EN3 


—L 
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Commodore 

Un appassionante videogame a 3 

64 


DIMENSIONI\ tutto scrìtto in linguaggio macchina e dalla grafica 
di GIAN PIERO ROSI eccezionale 


Super Jump 


icordate il gioco “JUMP 3D" pubblicato l’anno scor¬ 
so su LIST? Lo abbiamo rielaborato, riscrivendolo 
da capo in linguaggio macchina ed il risultato ha 
stupito anche noi: ne è scaturito non solo un gioco 
divertente, ma soprattutto piacevolissimo dal punto 
di vista grafico. Nella schermata iniziale viene subito visualizzata la 
grande scacchiera gialla a tre dimensioni, con in alto il punteggio 
del computer e del giocatore (ovviamente nulli all’inizio) e la simpa¬ 
tica “griffe” del gioco. In basso noterete la linea per la selezione di 
uno dei tre livelli di difficoltà. 

Digitate il valore prescelto e immediatamente compariranno le due 
pedine: quella del computer è rossa, mentre quella del giocatore è 
azzurra. Contemporaneamente una delle caselle della scacchiera 
comincerà a lampeggiare: è proprio su quella che dovrete dirigere 
la vostra pedina, prima che lo faccia il computer. Infatti “toccare” 
la casella lampeggiante frutterà un bottino di 10 punti, e una nuova 
casella della scacchiera comincerà a cambiare colore. Vince chi 
per primo raggiunge il traguardo dei 1000 punti, considerando che 
il gioco riserva delle inaspettate sorprese: poco a poco, in maniera 
casuale, tutte le caselle della scacchiera (tranne la cornice più 
esterna) scompaiono! Le vedrete dissolversi una alla volta durante 
lo svolgersi della partita, rendendo il gioco sempre più difficile: in¬ 
fatti sia voi che il computer, finendo su uno dei “buchi” lasciati dal¬ 
le caselle scomparse, cadrete inesorabilmente nel vuoto, con un 
comico effetto visivo e sonoro. 

Per muovere la pedina sulla scacchiera si devono usare i due tasti 
"CRSR” che, come ben sapete, con l’ausilio del tasto SHIFT per¬ 
mettono di spostarsi agevolmente lungo le quattro direzioni possi¬ 
bili. 

Punto di forza di questo gioco è l’eccezionale realismo con cui le 
pedine saltano sulla scacchiera (è possibile vedere anche le ombre 
degli oggetti in movimento!), producendo un suono anch'esso mol¬ 
to realistico. Inoltre potrete notare che il computer guida la propria 
pedina dando la parvenza di possedere una sua intelligenza ...arti¬ 
ficiale! 

Quando uno dei due concorrenti totalizzerà i fatidici 1000 punti, si 
aprirà una finestra al centro dello schermo con il messaggio di vit¬ 
toria. Per ricominciare a giocare, premere la barra spaziatrice. 


MODALITÀ 9 DI CARICAMENTO 

Il listato che vi forniamo su queste pagine necessita del drive per il 
suo corretto funzionamento. Infatti una volta lanciato creerà su di¬ 
sco il programma in linguaggio macchina vero e proprio, che potrà 
essere tranquillamente caricato con il comando LOAD “JUMP- 


3D.LM",8 e lanciato con un RUN. 

Una volta che il programma in linguaggio macchina sarà residente 
su disco, quello in BASIC che avevate digitato non vi servirà più. 
Inoltre JUMP3D.LM potrà essere salvato anche su cassetta ed uti¬ 
lizzato da chi non possiede il drive. 

Il listato BASIC è dotato anche di un controllo automatico dei DATA 
(check-sum), il quale fornisce il numero della eventuale linea digi¬ 
tata in maniera errata. In questo caso il programma in linguaggio 
macchina registrato fino a quel momento, verrà cancellato dal di¬ 
sco, in modo che possiate correggere la linea inesatta e rilanciare 
di nuovo il programma senza incorrere in messaggi di errore da 
parte del drive. 


1 OPEN 8,8,8,■JUMP30.LM,P,U"8LI*9 

2 S*=0 s READ fl$J IF A**"* - THEN CL0SE88 END 

3 LI-LI+l8B*»LEFT*<A*,20)+MID*<A*,22,20>+ 
RIGHT*<A*,20> 

4 FORI«1TO60STEP28H**MID*<B*,I,1):L*=MID$ 
<B*,I+1,1) 

3 H»VAL<H*>8IFH*>"9-THEhW*ASC<H*>-33 

6 L-VAL<L*>«IFL*> B 9"THENL»ASC<L*>-33 

7 X«H*16+L8S«S+X8PRINT#8,CHR*(X>;8NEXTI 

8 READCKiIFCK»STHEN2 

9 CLOSE880PEN13,8,15,"S08JUMP3D.LM"8CLOSE 
13 8 PRI NT "ERRORE ALLA LINEA "Li: EM) 

10 DATA 01080B080A009E323337 32000000EAEA 
EA000001 03070F1F3F00FFFFFFFF,2246 

11 DATA FFFFFF00FCF9F3E7CF9F 3F00FCF8F4EC 
DCBC7C7F FFFFFFFFFFFFFFFFFFFF,6338 

12 DATA FFFFFFFFFFFEFCF9F3E7 CF9F3FFEFDFB 
F7EFDFBF 7FFCFCF8F0E0C08000FE,6308 

13 DATA FCF8F0E0C08000003F3F 3F3F3F3F3FEA 
EA000000 000000A9088D6A08BD10,2830 

14 DATA 0891FBC8D002E6FCE8CE 6A08D0F060EA 
A20891FB C8D002E6FCCAD0F660EA,3070 

13 DATA EAEAA2B0A02B86FB84FC A200A0002070 
08A9038D 6B08A208207008CE6B08,3323 

16 DATA D0F6A9038D6C08A21020 7008A9038D6B 
08A20820 7008CE6B08D0F6CE6C08,3062 

17 DATA D0E7A218207008A90E8D 6B08A9002087 
08CE6B08 D0F8A200207008A22020,2877 

18 DATA 7008A228207008A22820 7008A9038D6B 
08A23020 7008A220207008A22820,2200 

19 DATA 7008A228207008CE6B08 D0E7A2382070 
08A24020 7008A9058D6E08A90D8D,2738 
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20 DATA 6B08A900208708CE6B08 D0F8A2002070 
08A9038D 6B08AB08207008CE6B08,2630 

21 DATA D0F6A9058D6C08A21020 7008A9038D6B 
08A20820 7008CE6B08D0F6CE6C08,3062 

22 DATA D0E7A218207008A24820 7008A90D8D6B 
08A90020 8708CE6B08D0F8A20020,2916 

23 DATA 7008A220207008A22820 7008A2282070 
08A9058D 6C08A230207008A22020,2193 

24 DATA 7008A228207008A22820 7008CE6C08D0 
E7A23820 7008A240207008CE6E08,2661 

25 DATA F0034C2809A90E8D6B08 A900208708CE 
6B08D0F8 A9068D6B08A250207008,2753 

26 DATA A9038D6C08A208207008 CE6C08D0F6CE 
6B08D0E7 A2482070086002000202,2775 

27 DATA 01040591FBC8D0FBE6FC CAD0F660EAA2 
20A00086 FC84FBA900A20C20000A,4041 

28 DATA A23A86FCA20620000AA2 0486FCA97020 
000AA950 A2189D4A07CAD0FA2097,3207 

29 DATA 08AD18D009088D18D0AD 11D009208DU 
D0A9008D 20D020000E4CCA0A00FF,2747 

30 DATA FF01FFFF03FFFD07FFF9 0FFFF11FFFE2 
3FFFC47F FF88FFFF108001208001,4659 

31 DATA 40800180FFFF00000000 000000000200 
00060000 0E00001C000038000070,1049 

32 DATA 0000E07FFEC07FFE807F FE0000000000 
00000000 00000000FFFF01FFFE03,2710 

33 DATA FFFC07FFF80FFFF01FFF E03FFFC07FFF 
80FFFFEA EAEAEAEAEAA226BD540A,5454 

34 DATA 9D3F03BD9D0A9DBF02CA D0F1A219A900 
9D65039D E502CAD0F7A223BD7A0A,3760 

35 DATA 9D7F03CAD0F7A21CA900 9DA203CAD0FA 
A90D8DF8 078DFA07A90E8DF9078D,3982 

36 DATA FB07A90B8DFC078DFD07 A98C8D00D08D 
02D0A97A 8D01D08D03D0A9DC8D04,3775 

37 DATA D08D06D0A9CA8D05D08D 07D0A98C8D08 
D0A97A8O 09D0A9DC8D0AD0A9CA8D ,4219 

38 DATA 0BD0A9008D10D08D17D0 8D1BD08D1CD0 
801DD08D 2BD08D2CD0A9068D27D0,3604 

39 DATA A9018D28D0A90A8D29D0 A9018D2AD0A9 
FF8D15D0 4CA50BEAEAEAEAA50F8D,3992 

40 DATA 940B8D950BCE940BD0FB CE950BD0F660 
EA000001 01040501010503000130,2504 

41 DATA 00000000A9018D960B8D 970BA9068D98 
0B8D990B 203EF1F0FBAE960BAC97,3043 

42 DATA 0B8E9A0B8C9B0BC991D0 034CE30BC91D 
D0034C38 0CC911D0034C8C0CC99D ,3095 

43 DATA D0D64CE90CEACE9B0BF0 CD20380DF0C8 
AD9B0B8D 970BA211CAD0034C700D ,3770 

44 DATA 20800BEE00D0D008AD10 D009138D10D0 
EE02D0EE 08D0CE01D0CE03D0CE09,3572 

45 DATA D0E009100CEE01D0EE03 D0CE09D04CF5 
0BCE01D0 CE03D0EE09D04CF50BEA,3973 

46 DATA EAEE9A0BAD9A0BC907D0 034CB50B2038 
0DF0F8AD 9A0B8D960BA221CAD003,3499 

47 DATA 4C700D20800BEE00D0D0 08AD10D00913 
8D10D0EE 02D0EE08D0E011100CEE,3233 

48 DATA 01D0EE03D0CE09D04C52 0CCE01D0CE03 
D0EE09D0 4C520CEAEAEE9B0BAD9B,3908 

49 DATA 0BC907D0034CB50B2038 0DF0F8AD9B0B 
8D970BA2 11CAD0034C700D20800B,2893 

50 DATA CE00D01008AD10D029EC 8D10D0CE02D0 
CE08D0EE 01D0EE03D0EE09D0E009,3899 

51 DATA 100CEE01D0EE03D0CE09 D04CA60CCE01 
D0CE03D0 EE09D04CA60CEAEACE9A,3970 


52 DATA 0BD0034CB50B20380DF0 F8AD9A0B8D96 
0BA221CA D0034C700D20800BCE00,2905 

53 DATA D01008AD10D029EC8D10 D0CE02D0CE08 
D0E01110 0CEE01D0EE03D0CE09D0,3697 

54 DATA 4CFE0CCE01D0CE03D0EE 09D04CFE0CEA 
EA78AD98 0BCD9A0BD00CAD990BCD,4027 

55 DATA 9B0BD004A9005860A9FF 586020200EAD 
960BCD9C 0BD00BAD970BCD9D0BD0,3258 

56 DATA 03A90060A9FF60001000 000000AE970B 
BD690DAE 960BCAF0044A4C790D18,2536 

57 DATA 4A90034CC50D20510DF0 034CB50BEEC0 
0DADC00D C90AD01EA9008DC00DEE,3167 

58 DATA C10DADC10DC90AD00FA9 008DC10DEEC2 
0D20D015 4C4A 19EAA9008D9F0B4C,3206 

59 DATA B50BEA000000EAEAA903 8D1BD0A9418D 
04D4AD01 D049FFA820800BEE01D0,3529 

60 DATA EE03B0888C01D4D0F1A9 008D04D4A900 
8D1BD0A9 018D9E0BAD9E0BD0FB88,3875 

61 DATA 8C01D44CB50BEAA9018D 8902A9648D02 
D4A90F8D 05D4A9F48D06D4A9FF8D,3808 

62 DATA 01D44C2E0EEAEAEAEAA9 818D04D4A980 
8D04D460 EAEAEAA98F8D18D4A9FF,4505 

63 DATA 8D0FD4A9818D12D44CC0 0E0000000000 
00000000 00000000000000000000,1319 

64 DATA 00FF0001FF0003FF0007 FF000FFF001F 
FF003FFF 007FFF00FFFF01FFFF03,3311 

65 DATA FFFF07FFFF0FFFFF1FFF FF3FFFFF0000 
00000000 00000000000000000000,2666 

66 DATA 000000FFFFFCFFFFF8FF FFF0FFFFE0FF 
FFC0FFFF S0FFFF00FFFE00FFFC00,5870 

67 DATA FFF800FFF000FFE000FF C000FF8000FF 
000000A9 398DFE07A93A8DFF074C,3896 

68 DATA E30FEAEAEAEA30507090 B0D0758595A5 
B5C5EAEA EAADFA09C903F0034CA8,4713 

69 DATA 0FAD9E0BD0034CA80FA9 018D960B8D97 
0BA98C8D 00D08D02D08D08D0A97A,3259 

70 DATA 8D01D08D03D08D09D0A9 008D9E0BADFA 
09C903D0 23A9068D980B8D990BA9,3371 

71 DATA DC8D04D08D06D08D0AD0 A9CA8D05D08D 
07D08D0B D0A9018DFA09201510A9,3536 

72 DATA 0185FB20D015EAEAA901 8D9F0BAD10D0 
293F8D10 D0AE9C0BBDD00E8D0CD0,3574 

73 DATA 8D0ED0AE9D0BBDD60E8D 0DD08D0FD0E8 
E007F016 AD0CD01869108D0CD090,3616 

74 DATA F0AD10D009C08D10D04C 700FAD0CD018 
69188D0E D04CD00FEAEAEAAD1BD4,3728 

75 DATA 2907F0F9C907F0F560EA EAAD9F0BD019 
203A 19D0 0920801620F0134CC60F,3464 

76 DATA AD9E0BF0034CF20E4C15 0F200010EAEA 
EA4CE00F EA900EAD10D009808D10,3177 

77 DATA D04CE00F0200174C5011 78A2E0A00E8E 
14038C15 03EAA9008D9F0BA9008D,2754 

78 DATA 2DD08D2ED04C6010EACE DD0FD00BEE2D 
D0EE2ED0 A90A8DOD0F60EAEAEAEA,4302 

79 DATA 209A0F8D9C0B209A0F8D 9D0BAD9C0BCD 
960BD00B AD9D0BCD970BD0034C15,2960 

80 DATA 10AD9C0BCD980BD00BAD 9D0BCD990BD0 
034C1510 AE9D0BBD690DAE9C0BCA,3169 

81 DATA F0044A4C5010184AB0BA 60EAEAEAEAA9 
008DC00D 8DC10D8DC20DA2069D69,3622 

82 DATA 0DCAD0FA8D83108D8410 8D85104C4A13 
EAEAEAEA 090000EAEAADFB09D003,3766 

83 DATA 4C4E11AE980BAC990B8E FE098CFF09C9 
01D010CE FF09D0034C4E11A9118D,3258 
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84 DATA DF8F4CF010C902D015EE FE09ADFE09C9 
07D0034C 4E11A9218DDF0F4CF010,3442 

83 DATA C903D015EEFF09ADFF09 C907D0034C4E 
11A9118D DF0F4CF010CEFE09D003,3339 

86 DATA 4C4E11A9218DDF0FEAAE FF09BD690DAE 
FE09CAF0 044A4CF910184A9008A9,3448 

87 DATA 018DDE0F4C4E11A9008D DE0FADFE09CD 
960BD00B ADFF09CD970BD0034C4E,3287 

88 DATA 11A5FBF007A90085FB4C 4911ADF909CD 
FB09F012 4AB009ADFB094AB0094C,3580 

89 DATA 4E11ADFB094AB005A900 8DFA0960EAAD 
FA09F003 4C5B12AEDF0FADFB09C9,3588 

90 DATA 01D03ECAD0034C5312EE 04D0D008AD10 
O0092C8D 10D0EE06D0EE0AD0CE05,3461 

91 DATA D0CE07D0CE0BD0E00910 0CEE05D0EE&7 
D0CE0BD0 4C4D12CE05D0CE07D0EE,3893 

92 DATA 06D04C4D12C902D035CA D0034C5312EF 
04D0D008 AD 10D0092C8D10D0EE06,3169 

93 DATA D0EE0AD0E011100CEE05 D0EE07D0CE0B 
D04C4D12 CE03D0CE07D0EE0BD04C,3806 

94 DATA 4D12C903D03ECAD0034C 5312CE04D010 
08AD10D0 29D38D10D0CE06D0CE0A,3251 

93 DATA D0EE05D0EE07D0EE0BD0 E009100CEE05 
D0EE07D0 CE0BD04C4D12CE05D0CE,3955 

96 DATA 07D0EE0BD04C4D12CAD0 034C5312CE04 
D01008AD 10D029D38D10D0CE06D0,3309 

97 DATA CE0AD0E011100CEE05D0 EE07D0CE0BD0 
4C4D12CE 05D0CE07D0EE0BD08EDF,3855 

98 DATA 0F4C4213A9018DFA094C 6A13C901F017 
C902F003 4C421320B316D0034C42,2607 

99 DATA 13A9038DFA094C4213AD 980BCD9C0BD0 
3BAD990B CD9D0BD033EE8310AD83,3385 

100 DATA 10C90AD021A9008D8310 EE8410AD841 
0C90AD012 A9008D8410EE851020D0,3154 

101 DATA 154C4A19EAEAEAEAA900 8D9F0B4C421 
3AE990BBD 690DAE980BCAF0044A4C,3331 

102 DATA C212184A9008A9028DFA 094C4213ADF 
B098DF909 AD9F0BD0034C4213AD98,3066 

103 DATA 0BCD9C0BD005A9004CF9 121005A9024 
CF912A904 8DFC09AD990BCD9D0BD0,3136 

104 DATA 05A9004C12131005A903 4C1213A9018 
OFD09ADFC 098DFB09208810ADFA09 ,2617 

103 DATA F013ADFD098DFB092088 10ADFA09F00 
54C8A13EA EAADFE098D980BADFF09,3834 

106 DATA 8D990B4C7A13EAEAEAEA EA201016EAE 
AA9018DFA 09A9648D09D4A90F8O0C,3768 

107 DATA D4A9F48D0DD4A9108D08 D460EAA9818 
D0BD4A980 8D0BD44C4213EAEAEA20,4085 

108 DATA 87EAAD0DDC68A868AA68 40EA4CF016A 
DFC09D01D A9048DFB09208810ADFA,3913 

109 DATA 09F09AA9028DFB092088 10ADFA09F08 
D4C901AAD FD09D0F8A9018DFB0S20,3712 

110 DATA 8810ADFA09D0034C3613 A9038DFB092 
08810ADFA 09D0DB4C3613EAEAEAEA,3645 

111 DATA EAEAEAEAEAEAEAEAEAEA EAEAEAEAEAE 
AEAEAEAEA EAEAEAEAEAEAEAAE9D0B,6660 

112 DATA A901AC9C0B88F0040A4C F8131D690D9 
D690DA260 A02B86FD84FEA900AE9D,3398 

113 DATA 0BCAF00EE6FEE6FE1869 8090F4E6FE4 
C1214AE9C 0BCAF00A18692090F8E6,4254 

114 DATA FE4C2614AE9D0BE8E007 F00A1869109 
0F6E6FE4C 3614A8A200B1FD3D1008,3489 


115 DATA 91FDC8D002E6FEE8E008 D0EFA900A21 
891FDC8D0 02E6FECAD0F6A200B1FD,5098 

116 DATA 5D7D1491FDC8D002E6FE E8E008D0EF4 
C861400FC F8F0E0C08000EA981869,4470 

117 DATA 109002E6FEE6FEA8A200 81FD5D10089 
1FDC6D002 E6FEE8E008D0EFA218A9,4365 

118 DATA 0091FDC8D002E6FECAD0 F6A200B1FD5 
DC61491FD C8D002E6FEE8E008D0EF,3054 

119 DATA 60FEFCF8F0E0C08000EA EAEAEAEAEAE 
AEAEAEAEA EA 183C666666663C1808,5026 

120 DATA 18387818183C3C3C7E66 0C18327E7E7 
E7E0C180C 667E3C0C1830606C7E7E,2122 

121 DATA 0C7E7E607C7E067E7C0C 18307C7E667 
E3C7E7E06 0C18181818183C667E3C,2226 

122 DATA 667E3C3C7E667E3E0C18 307E7E66667 
E7E66667E 7E606060607E7E7E7E60,2996 

123 DATA 7878607E7E1818181818 18181830303 
03030303C 3C42667E7E666666667E,2142 

124 DATA 7E666666667E7E7E7E66 667E7E60607 
E7E66667E 7E6C667E7E1818181818,2976 

125 DATA 186666666666667E7E66 66663C3C181 
818666666 66667E3C180018180000,2154 

126 DATA 1818000000000000000A 0A0AAAA9088 
3FCBDDA14 91FDC8D002E6FEE8C6FC,3211 

127 DATA D0F160EAEAA90885FCBD DA 1491FDC8D 
002E6FEE8 C6FCD0F160EAEAA98085,5419 

128 DATA FDA92085FEA000AD8310 20A015AD841 
020A015AD 831020A013A90020A015,2985 

129 DATA A9F883FDA000ADC20D20 A015ADC10D2 
0A013ADC0 0D20A013A90020A01360,3217 

130 DATA EAA90A8DDD0F20D013A9 3085FDA9208 
5FEA000A2 3820BA15A28£20BA13A2,3382 

131 DATA 7820BA15A28820BA15A2 A020BA15A29 
820BA13A2 6020BA 15A29020BA13A2,3214 

132 DATA B820BA15A9B885FDA000 A28820BA15A 
27020BA 15 A23020BA13A2A820BA15,3422 

133 DATA A26020BA15A29020BA15 A2B820BA15A 
91085AA4C 9C16EA201310AD9C0BC9,3213 

134 DATA 01F0F6C906F0F2AD9D0B C901F0EBC90 
6F0E7C6AA 60A204A9619D0F04CAD0,4354 

135 DATA FAA204A9619D1E04CAD0 FA4C1A17EAE 
AA90C0D1B D08D1BD0A9418D0BD4AD,3702 

136 DATA 05D049FFA8EE03D0EE07 D0888C08D4F 
003A90060 A9008D0BD4A9F32D1BD0,3842 

137 DATA 8D1BD0A9108D08D460EA EAEAEAEAEA8 
□FB092088 10ADDE0FF008A9008DFA,4225 

138 DATA 094C3613ADFC098DFB09 208810ADDE0 
FF0034CFB 164C7A13EAEAEAA93C85,3492 

139 DATA 0AA917850BA90785FDA9 2385FEA205A 
040B10A91 FD88D0F9E6FEA5FD1869,4099 

140 DATA 409002E6FE85FDA50A18 69409002E60 
B850ACAD0 DCA912A2A09D4F04CAD0,3767 

141 DATA FA4CA018000000000000 00000000000 
0030F3FFF 00000383C3C7E7EF0000,1844 

142 DATA 80F0F0F0E0E000000000 0000707E000 
000000000 00030001071F7FFF0FEC,2209 

143 DATA 00E0F8F8FCFE3E1F030F 3FFFFFFF782 
0FFFEF8FC FCFEFE7F8F0F1F1F1F3F,4527 

144 DATA 3F3FE0C0C0C181818303 7EFEFEFCFDF 
9F3F30707 8F8FDFFFFFFFE8ECECEE,5423 

145 DATA EEEFEFEF1F0F0F1F3F7E FEFC0000000 
000000000 7F3F3F1F1F0F0F073FBF,2348 

146 DATA 9FDFCFEFE7F70307070F 1FFFFFFFF3F 
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7E6EECEDE 9EBEFFFFFBFB73230303,9036 

147 DATA EFEFEFEFE7E7E7E3F0C0 80COC0E0E0F 
000010303 030300000787FFFFFFFF,4683 

148 DATA FF3EF7F7F7F0F0E08000 FFFEFCF8000 
000003E3E 3E3E3E3E3E0003030303,3349 

149 DATA 03030300E3E1E1E1E0E0 EOO0F0F8F8F 
0C0000000 000000EAAAEEA4E40000,3789 

190 DATA 000E080A0A0E000000BA ABABBAAA000 
0004342C2 C342000000AEA8ACA82E,2296 

191 DATA 000000EEAAEACAAE00O0 001D191D191 
9000000DD 919D49DOFFFFEA20B018,2804 

192 DATA 98602087EAA9C9C940F0 F760EAA9008 
D10D089FD A93E89FEA000A27020BA,4219 

193 DATA 19A26820BA19A2A820BA 19A26020BA1 
9A27020BA 19A27020BA19A28020BA,3126 

194 DATA 19A2B820BA19A20820BA 19A2BF20BA1 
9A21020BA 19A2BF20BA19A21820BA,3020 

199 DATA 19A9108DC8078DCA078D CCO7EA20A91 
8A9C9C938 D00AA90 1.8DC807A90989 ,3373 

196 DATA 0F60C93BD00AA9018DCA 07A906890F6 
0C908D0DB A9018DCC07A907890F60 ,3106 

197 DATA EAA9AAF006AD1BD42913 60A9FF60EAE 
AEAEAEA78 A9008D19D0A270BD2F2E,4288 

198 DATA 9D0040BD6F2F9D7040BD AF309DE040B 
DEF319090 41BD2F339DC041CAD0DF,3871 


199 DATA A900A2709D2F2E9D6F2F 9DAF309DEF3 
19D2F33CA D0EEA91CA20E9DC9099D,3629 

160 DATA ED099D19069D3D069D69 06CAD0EEA97 
889FDA92F 89FEA000A2A820BA19A2,3731 

161 DATA 6820BA19A29820BA19A2 9820BA19A28 
020BA19A2 9020BA19A26820BA19A2,3190 

162 DATA 9020BA19A98089FDA280 20BA19A2602 
0BA19A270 20BA19A000A93289FEAD,3480 

163 DATA 8910D007A91089FD4C89 1AA90885FDA 
29820BA19 A28020BA19A27820BA19,3180 

164 DATA A28820BA19A2A020BA19 A29820BA19A 
26020BA19 A29020BA194C471AEAEA,3334 

169 DATA A28820BA19A27020BA19 A29020BA19A 
2A820BA19 A26020BA19A29020BA 19,3142 

166 DATA 20A918C93CD0F9A970A2 0E9DC9099DE 
D099O1906 9D3D069D6906CAD0EEA2,3636 

167 DATA 70BD00409D2F2EBD7040 9D6F2FBDE04 
09DAF30BD 90419DEF31BDC0419D2F,3981 

168 DATA 33CAD0DF4C0C0AEAEAEA EAEAEAA9018 
9FBA90489 69AD 1BD429038DFB09EF. ,4246 

169 DATA FB09208810AOFA09F02C ADDE0FF00CA 
DFB09896A AD 1BD42903F016C669F0,3799 

170 DATA 0DCEFB09D0DEA9048DFB 094CA31AA96 
A8DFB09A9 008DFA094C3613EAFF00,3627 

171 DATA * 


WALT 64 


CREATORE AUTOMATICO DI IMMAGINI ANIMATE 


di GIAN PIERO ROSI 

Il nome di questo programma è sta¬ 
to coniato in onore del mago dei 
cartoon Walt Disney e vi sorprende¬ 
rà quando scoprirete quello che è in 
grado di offrirvi 

er sfruttare fino in fondo le capacità di questo pro¬ 
gramma è sufficiente avere tanta fantasia, perché a 
tutto il resto pensa WALT 64. 

Esso è in grado di creare automaticamente un pro¬ 
gramma BASIC che, una volta lanciato, disegnerà la 
schermata da voi definita nel modo che vi spiegheremo tra poco. 
La sua caratteristica più notevole è quella di darvi la possibilità di 
ottenere figure animate, usando un procedimento cosi semplice 
che i risultati ottenuti vi stupiranno. 

Prima di tutto digitate il listato pubblicato su queste pagine e salva- 



Commodore 

64 


10 POKE53280 , 0 : P0KE53281 , 0 : H=49152 : P0KE4 
9152,0: PRINT'IEj '; : P=0: S=0: G0T045 
15 PRINTMj’; :C=0 

20 X=PEEK(H+C)-48 : IFX<0THENRETURN 
25 Y=PEEK(H+C + l)-48 :C$=CHR$(PEEKCH+C+2 ) ) 
:C=C+3 

30 P0KE214 , Y:PRINT:PRINTTABCX)' □"C$; 

35 GOTO20 
40 : 

45 X =POS(0):Y=PEEK(214):P0KE214,23 
50 PRINTiPRINT IMFll USTART IMF31 BPPS ! 

IMF71 «SALVA IM5TEPU"S'11 "; 

55 P0KE214,Y:PRINT:PRINTTAB(X) ''□"> 

60 W=PEEK(214)*40+POS(0)+1024 :POKEW,PEEK 
(W)0R128 

65 GETQS: IFQ$ = ’ 1 ' THEN65 
70 POKEW,PEEKCW)AND127 

75 F = 1 :IFASCCQS)=133THENG0SUB15:G0T045 
80 IFASC(Q$) = 134THEN150 
85 IFASCCQS)=136THEN165 
90 IFQ$ = "3 ,, OR(QS = '1I' , ANDPOS(0) )THEN115 
95 IFOS = ’ ANDPEEK (214) <23THEN115 
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telo su disco. 

Lanciatelo poi con il solito RUN e avrete subito a disposizione il 
cursore (che potete muovere sullo schermo con i tasti CRSR). 
Nell’ultima riga in basso sullo schermo, si trova il promemoria per i 
tasti funzione e il numero di STEP memorizzati (ovvero, i passi di 
programma, di cui vedremo tra poco il significato). 

Il tasto FI ("START”) serve per far eseguire l’animazione creata fi¬ 
no a quel momento, il tasto F3 (“OPS!") permette di cancellare l’ul¬ 
timo evento dell’animazione memorizzato, ovvero l’ultimo carattere 
digitato, mentre il tasto F7 ("SALVA") comunica al computer che la 
schermata è terminata, e che deve creare su disco il programma 
BASIC in grado di riprodurla. 

Praticamente ogni volta che voi scrivete un carattere sullo scher¬ 
mo, digitandolo sulla tastiera, questo “evento" viene memorizzato 
in una sequenza di passi (STEP), che poi verranno eseguiti di nuo¬ 
vo dal computer in modo automatico e nello stesso ordine. 
Naturalmente nella sequenza di STEP non verranno inclusi i movi¬ 
menti del cursore ottenuti con i tasti CRSR, ma solamente i caratteri 
che devono essere stampati sul video e le rispettive coordinate in 
cui devono apparire. 

Le potenzialità di questo programma potrebbero non risaltare suf¬ 
ficientemente se non si tenesse conto di un fatto: il computer ripete¬ 
rà diligentemente tutto quello che fate, ma eseguendolo a velocità 
uniforme. 

Potrete scrivere un carattere in alto a sinistra sullo schermo, poi 
spostarvi con i tasti CRSR all’altro capo del video, digitare un altro 
carattere e così via. Tutto questo verrà stampato di nuovo ma in 
modo più veloce. 

Gli effetti più spettacolari potranno essere realizzati utilizzando 
stratagemmi di questo tipo: ad esempio, provate a digitare con l’au¬ 
silio dei simboli grafici un segmento lungo cinque caratteri; cancel¬ 
late poi, con la barra spaziatrice, uno dei caratteri ad una estremità 
e aggiungetene un’altro all'estremità opposta. Proseguite cosi, fa¬ 
cendo descrivere al segmento grafico tutte le ...evoluzioni che vole¬ 
te! 

Quando selezionerete l’opzione di START con il tasto funzione FI, il 
programma vi mostrerà una vera e propria animazione, con risulta¬ 
ti che vi possiamo assicurare saranno molto piacevoli. 

Potete stampare qualunque carattere (alfabetico, numerico, grafi¬ 
co, ecc.) per creare così schermate di qualsiasi tipo. 

Appena il vostro lavoro è finito, digitate il tasto funzione F7 per sal¬ 
vare l’animazione. 

Vi verrà chiesto di digitare il nome che volete dare al nuovo pro¬ 
gramma, dopodiché vedrete accendersi la spia del DRIVE, segno 
che il calcolatore sta salvando su disco la vostra creazione. 
Appena sarà comparso il messaggio di READY sul video, potete ve¬ 
rificare se tutto ha funzionato a dovere, caricando dal disco il pro¬ 
gramma creato. 

Lanciatelo con il solito RUN e sarete in grado di rivedere la scher¬ 
mata animata. 

Provate ora a chiedere il listato di questo programma. Vedrete che 
si tratta di un comune listato BASIC (anche se tanto comune non è, 
visto che lo ha creato di sana pianta il vostro C64!) che potrete, 
inoltre, modificare a piacere. 

Questo fatto vi permetterà di usare la schermata come sigla intro¬ 
duttiva di un altro programma: basterà che proseguiate con il vo¬ 
stro listato quello precedentemente creato da WALT 64. 
Ovviamente dovrete eliminare l’END presente alla linea 9 di que¬ 
st’ultimo, sostituendolo con un GOTO che rimanda alla linea di ini¬ 
zio del vostro programma. 


100 IFQS = ' W ' ANDPOS(0)< 40THEN115 

105 IF (ASCCQS)>31ANDASCCQS)<128)ORASC(QS 

)>161THENF =0 :GOTOl15 

110 GOTO60 

115 X=POS(0)+48:PRINTQS; :IFPOS(0)=39THEN 

printw; 

120 IFFTHEN60 

125 IFP > 4092THENPOKE214,23 :PRINT:PRINT * S 
TEPS DI PROGRAMMA TERMINATI!’:END 
130 POKEH+P>X:POKEH+P + 1>PEEKC214)+48:POK 
EH+P+2>ASCCQS):P=P+3:POKEH+P>0 :S=S + 1 
135 X =POS(0):Y=PEEK(214):POKE214 > 23 :PRIN 
T: PRINTTABC33 )'I'S; 

140 POKE214 >Y:PRINT:PRINTTABCX)"□■"i:GOT 
080 
145 : 

150 IFS>0THENP=P-3:S=S-1:POKE H+P>0:GOSU 
B15 :G0T045 
155 GOTO60 
160 : 

165 INPUT"ENOME FILE";NS:PRINT* ■ATTENDI ! 

OPEN 8»8,8 9 NS + aa »P»W >> :LI =210: E =20: G=20 
170 IFG=0THEN250 

175 S=0:READAS:IFLENCAS)=37THENE=16:G=0 
180 LI=LI+5 :BS=LEFTS(AS,20)+MIDS ( AS, 22, E 
)+RIGHTS(AS,G) 

185 FORI=1T0LEN(BS)STEP2:HS=MIDSCBS> I > 1) 
:LS=MIDS(BS,1*1,1) 

190 H=VAL CHS ) : IFHS > ‘ '9 ' THENH=ASC CHS) -55 
195 L-VALCLS): IFLS> '*9 ' THENL=ASC(LS ) -55 
200 X =H*16 +L:S =S +X:PRINT#8 > CHRS(X); :NEXT 
I 

205 READCK:IFCK=STHEN170 
210 CL0SE8:0PEN15,8,15,*S0:"+NS:CL0SE15: 
PRINT 1 TERRORE ALLA LINEAGLI : END 
215 DATA 01081D08010097353332 38302C303A 
9735333238 312C303A992293052200>1539 
220 DATA 2F0802008741243A8B41 24B2222A22 
A739004008 03008149B231A4C32841>2071 
225 DATA 2429A933005608040058 B2C628CA28 
41242C492C 312929AB3438006E0805,1936 
230 DATA 0059B2C628CA2841242C 49AA312C31 
2929AB3438 00810806004324B2CA28 > 2304 
235 DATA 41242C49AA322C312900 9808070097 
3231342C59 3A993A99A35829229122 >2101 
240 DATA 432400A1080800823A89 3200A70809 
008000,967 
245 : 

250 I=49152 : LI=9:S=2215 :E = 1 

255 ONEGOTO260,295,300 

260 AS =CHRS(34):T=1 

265 P-PEEK(I): IFP =0THENE=2 :G0T0275 

270 AS =AS +CHRS(P):I=I+1:T=T+1:IFT<70THEN 

265 

275 AS =AS +CHRS(34)+CHRS(0) 

280 LI-LI+1 :S=S+LEN(AS)+6:NH7.=S/256:NL7.= 
S-256*NH7.: RH7.=LI /256: RL7.*LI -256*RH7. 

285 AS =CHRS ( NL7. ) +CHRS ( NH7. ) +CHRS ( RL7. ) +CHR 

S ( RH7. ) +CHRS (131) +CHRS ( 32 ) + AS 

290 PRINT#8 > AS; :G0T0255 

295 AS = "* ' * +CHRS(0): E =3:GOTO280 

300 PRINT#8,CHRS(0)CHRS(0):CL0SE8: END | 
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MS-DOS 


Vi proponiamo un programma per 

un test che analizza con quanta decisione e sicurezza affrontiamo 



PROGRAMMI 


di LEANDRO DI BARI 



a moda dei tests sembra non tramontare mai. Quoti¬ 
diani e riviste ci tempestano con domande più o me¬ 
no dirette, più o meno indiscrete, ma tutte tendenti a 
darci un’immagine di noi stessi che forse non cono¬ 
scevamo o evitavamo di dover ammettere. Stiamo vi¬ 
vendo insomma, già da diversi anni per la verità, il boom della psi¬ 
canalisi o meglio della auto-psicanalisi. 

Moltissime persone infatti sono sempre più decise a scavare nei 
meandri della loro mente per cercare risvolti più o meno positivi ed 
aspetti a volte anche imprevedibili del loro carattere. Per far ciò pe¬ 
rò, non sono disposte a rivolgersi a un dotto incamiciato che con le 
sue espressioni, le sue titubanze o soggettive interpretazioni po¬ 
trebbe creare un qualche imbarazzo. 

Sono quindi preferite quelle fredde e distaccate serie di domande 
che sono perfettamente il linea con il dilagante “self-service” tipico 
di questi anni e dagli orizzonti sconosciuti. Tuttavia c’è da chiedersi 
se vi sono aspetti positivi in tutto ciò. La prima considerazione ri¬ 
guarda il fatto, ritengo indiscutibile, che una ben piccola percen¬ 
tuale dei...“test-omani” sarebbe disposta a farsi psicanalizzare da 
un esperto in carne ed ossa. Sono purtroppo tante, ancora oggi, le 
remore nei confronti della psicologia radicate nel più profondo del¬ 
la nostra cultura, che oppongono resistenza alla richiesta di rivela¬ 
re ad altri i più intimi aspetti del nostro carattere. Alcuni pertanto 
fanno notare come spesso si riesca ad essere più sinceri quando 
ad analizzare le nostre risposte siamo noi stessi o, come in questo 
caso, addirittura una macchina. Si può evitare in questo modo l’im¬ 
barazzo nel dare certe risposte, ed ovviamente anche l’orgoglio nel 
darne delle altre, a tutto vantaggio di un responso forse più freddo 
e con meno sfumature ma certamente più reale e calzante (e, per¬ 
ché no?, più rapido). 

Il test presentato con questo programma riguarda l’analisi della de¬ 
cisione e sicurezza con le quali affrontiamo le diverse situazioni 
della vita. Il profilo finale viene infatti stilato in base al comporta¬ 
mento che dichiariamo di poter avere nelle particolari, condizioni 
descritte. Da notare tuttavia che le risposte proposte sono soltanto 
due e rappresentano i due comportamenti limite, pertanto la nostra 
risposta va scelta per tendenza se non corrisponde a quella che 
descriverebbe più esattamente il nostro effettivo comportamento. 
Il programma presenta una struttura molto semplice, che può esse¬ 
re sfruttata per poter compilare altri tests a cammino simile a que¬ 
sto. È composta infatti di tre parti: la presentazione (eventualmente 
personalizzabile), la serie di domande e i cinque profili finali. In re¬ 
dazione sono disponibili altri quattro tests riguardanti il pudore, la 
gelosia, la solitudine e la sincerità riuniti con il presente in un pro¬ 
gramma ampliato la cui lunghezza ne ha precluso la pubblicazio¬ 
ne. Tale programma può comunque essere richiesto in entrambe le 
forme (ridotta o ampliata) alla redazione stessa. 


/ “casi” della vita 

SEI UN TIPO 
DECISO? 


20 ' SUPER TEST 

50 ■ 

100 CLS: CLEARs KEY OFF: DIM FR*Q4> 

1 1 0 DI*»" ,7^^=^==::^= U S D2* = » " S D3 

*»"l| * A * l"s D4Ì=" I V 2.6 II" 

1 20 " D5* = " ; ‘ Dò*-" é==^== SS ^ " - 1)7 

*=" n=i: DB*—" Il MESSAGGI " I " 

1 30 D9* = " 1 ' *' 

1 60 ' 

170 REM -- 

180 REM Presentazione 

200 FRINT Di*:: CF-62: GOSUB 2540: FRINT 

D2*s 

210 FRINT D3*: LOCATE 2.72: FRINÌ D4*s 
220 FRINT D5*;: CF-62: GOSUB 2540: FRINÌ 

D6* : 

230 FOR CI-4 TO 21: FRINT " II": LOCATE C 
1.79: FRINT "II": NEXT CI 

240 FRINT D7* : : CF=66: GOSUB 2540: FRINÌ 

» ji_ " • 

n» ■ 

250 FRINT DB*: LOCATE 23.80: FRINÌ "li"; 
260 FRINT D9*s: CF-67: GuSUB 2540: pftlNT 
“il " : 

270 LOCATE 2.23: FRINÌ "A L D E B A R A 
N S 0 F T W A R E" 


280 LOCATE 

•■•■i •-> „ 

FRINT " Fro q rammatore 

: Leandro 

Di Bar 

i 

290 LOCATE 

8.27: 

FRINÌ "S U P E R 

T EST 

ii 


300 LOCATE 

9.27: 

ii 

FRINT " 

STo’Tocate 

14.19: 

FRINÌ "S e 3. u n a 

o e r s o 

n a 

dee i sa" 

320 LOCATE 

16.25: 

FRINT "e s i c. u r a 

di s 

0 ?" 


330 FOR W=1 

TO 30 

00: NEXT 

340 LOCATE 

5,2: F 

RINT " LV ; : CF—74: GOSU 


& 2540: FRINÌ "" 

350 FOR CI =6 TO"20: FRINÌ " |f 

il NEXT CI 

360 FRINÌ " rs : CF»74:“GOSUB 2540; FRI 
NT " i!=q " 

370 LÓCATE 23.14: FRINÌ " 
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380 LOCATE 4.31: PRINT "S i c u r e z 2 
a" 

390 LOCATE 6.5: PRINT "DOMANDA:" 

400 LOCATE 12,3: PRINT " jl" : ! FOR CI = 1 TO 
74: PRINT NEXT CI: PRINT "II" 

410 LOCATE 13,5: PRINT "RISPOSTE: 11 

420 LOCATE 23.14: PRINT "Scegli la rispo 

sta premendo il tasto corrispondente" 

450 

460 LOCATE 9.10: PRINT "Normalmente sopn 
i : 

il 

enti 

480 LOCATE 18.15: PRINT M 2 - sconosciuti 

ii 

490 GOSUB 2620: ON R GOTO 500.540 

500 LOCATE 9.10: PRINT "Telefonata anoni 

mas 

ii 

510 LOCATE 16.15: PRINT "1 - butti giti 1 
a cornetta , " 

520 LOCATE 18.15: PRINT "2 - cerchi di i 
ndividuare l'autore " 

530 GOSUB 2620: ON R GOTO 580.620 
540 LOCATE 9.10: PRINT "Un vecchio libro 
oer l'estate. Scegli: 

ii 

550 LOCATE 16.15: PRINT "1 - Uccelli di 
rovo " 

560 LOCATE 18.15: PRINT "2 - Il Gattonar 
do " 

570 GOSUB 2620: ON R GOTO 700.740 

580 LOCATE 9.10: PRINT "La menomazione d 

iù grande oer te e perdere l'uso: 

n 

590 LOCATE 16.15: PRINT "1 - della parai 
a " 

600 LOCATE 18.15: PRINT "2 - delle gambe 

ii 

610 GOSUB 2620: ON R GOTO 780.820 
620 LOCATE 9.10: PRINT "Ti dicono scegli 
un'arma., Tu prendi: 

ii 

630 LOCATE 16.15: PRINT "1 - un mitra 

a 

640 LOCATE 18.15: PRINT "2 - arco e free 
ce " 

650 GOSUB 2620: ON R GOTO 580.820 
660 LOCATE 9.10: PRINT "Per quale tandem 
faresti il tifo? 

ii 

670 LOCATE 16.15: PRINT "1 - Visentini-P 
ertini " 

680 LOCATE 18.15: PRINT "2 - Andreotti~S 
padolini " 

690 GOSUB 2620: ON R GOTO 620.860 

700 LOCATE 9.10: PRINT “Trovi la porta d 

i casa socchiusa. 

ii 

710 LOCATE 16.15: PRINT "1 - Chiami la □ 


ol izia 

720 LOCATE 18,15: PRINT "2 - La soalanch 
i ed entri " 

730 GOSUB 2620: ON R GOTO 660.900 

740 LOCATE 9.10: PRINT "Ti accorgi che i 

I tuo partner ti ha detto una bugia. Tu: 

ii 

750 LOCATE 16,15: PRINT "1 - fai finta d 
i niente " 

760 LOCATE 18,15: PRINT "2 - gliela cont 
esti 

770 GOSUB 2620: ON R GOTO 700,940 

780 LOCATE 9.10: PRINT "In 'Via col yent 

o' ti era più simpatica: 

ii 

790 LOCATE 16,15: PRINT "1 - Rossella 0 
Hara " 

800 LOCATE 18.15: PRINT "2 Melania 

810 GOSUB 2620: ON R GOTO 820,980 
820 LOCATE 9,10: PRINT "Botte da orbi De 
strada tra due persone. 

i. 

830 LOCATE 16,15: PRINT "l - Intervieni 
a dividere " 

840 LOCATE 18,15: PRINT "2 - Ti fermi a 
guardare " 

850 GOSUB 2620: ON R GOTO 860,1020 

860 LOCATE 9,10: PRINT "Un'alternativa a 

11'Italia per te potrebbe essere: 

ii 

870 LOCATE 16,15: PRINT "1 - la Mongolia 

II 

880 LOCATE 18,15: PRINT "2 - l'Inghilter 
ra " 

890 GOSUB 2620: ON R GOTO 900,1060 
900 LOCATE 9.10: PRINT "Un cane ti ringh 
ia. Tu: 

ii 

910 LOCATE 16,15: PRINT "1 - passi oltre 

ii 

920 LOCATE 18,15: PRINT "2 - rimani ferm 
o " 

930 GOSUB 2620: ON R GOTO 940,1100 

940 LOCATE 9.10: PRINT "La prevaricazion 

e la trovi: 

950 LOCATE 16,15: PRINT "1 — detestabile 

ii 

960 LOCATE 18,15: PRINT "2 - inevitàbile 

ii 

970 GOSUB 2620: ON R GOTO 1100,1140 
980 LOCATE 9.10: PRINT "Un viaggio avven 
turoso lo faresti con: 

ii 

990 LOCATE 16,15: PRINT "1 - uno scienzi 
ato “ 

1000 LOCATE 18,15: PRINT "2 — un mercena 
rio " 

1010 GOSUB 2620: ON R GOTO 1180,1220 
1020 LOCATE 9.10: PRINT "Ti metti a tavo 
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la. Preferisci trovare: 

M 

1030 LOCATE 16,15: PRINT "1 - un bel Dia 
tto di verdura " 

1040 LOCATE 18,15: PRINT “2 - una bistec 
ca " 

1050 GOSUB 2620: ON R GOTO 980,1220 
1060 LOCATE 9,10: PRINT "Ti affascinano 
di dì ù le persone: 

1070 LOCATE 16,15: PRINT "1 - decise 

•i 

1080 LOCATE 18,15: PRINT "2 - comprensiv 
e 11 

1090 GOSUB 2620: ON R GOTO 1020,1260 
1100 LOCATE 9,10: PRINT "Preferiresti av 
ere come avversario: 

n 

1110 LOCATE 16,15: PRINT "1 - un serpent 

e nella .jungla " 

1120 LOCATE 18,15: PRINT '*2 - un toro ne 

11' arena " 

1.130 GOSUB 2620: ON R GOTO 1060,1300 
1140 LOCATE 9,10: PRINT "Ti mettono in m 
ano la prima pietra.-Tu: 

ii 

1150 LOCATE 16,15: PRINT "1 -- la posi 

1160 LOCATE 18,15: PRINT "2 - la scagli 

ii 

1170 GOSUB 2620: ON R GOTO 1100,1340 
1180 LOCATE 9.10: PRINT "Sei in auto. Il 
vigile che ti ferma è un po' arrogante. 

Tu: 

1190 LOCATE 16,15: PRINT “1 - reagisci 

ii 

120Ò LOCATE 18,15: PRINT "2 - subisci 

ii 

1210 GOSUB 2620: ON R GOTO 1220,1380 
1220 LOCATE 9.10: PRINT "Gloria e denaro 
sono destinati ai più: 

a 

1230 LOCATE 16,15: PR-INT "1 - audaci 

ii 

1240 LOCATE 18.15: PRINT "2 - fortunati 

ii 

1250 GOSUB 2620: ON R GOTO 1260,1420 
1260 LOCATE 9,10: PRINT "In un litigio d 
i coppia. Quando vola uno schiaffo è sem 
□ re meg 1 io:" 

1270 LOCATE 16,15: PRINT "1 - darlo 

ii 

1280 LOCATE 1*8,15: PRINT "2 - prenderlo 

ii 

1290 GOSUB 2620: ON R GOTO 1300,1460 
1300 LOCATE 9.10: PRINT "Notte in una gr 
ande città straniera. 

M 

1310 LOCATE 16,15: PRINT "1 - Vai in gir 


o tranquillo 

1320 LOCATE 18,15: PRINT "2 - Stai molto 
guardingo " 

1330 GOSUB 2620: ON R GOTO 1340,1500 
1340 LOCATE 9,10: PRINT "Grida da una ca 
sa che brucia. Che fai? 

a 

1350 LOCATE 16,15: PRINT "1 - Chiami i o 
ampieri " 

1360 LOCATE 18,15: PRINT "2 - Ti butti d 

entro la casa " 

1370 GOSUB 2620: ON R GOTO 1500,1580 
1380 LOCATE 9,10: PRINT "Ti propongono u 
n provino in TV. Il tuo pensiero è: 

ii 

1390 LOCATE 16,15: PRINT "1 - e se non v 
a? " 

1400 LOCATE 18,15: PRINT "2 - perché no? 

n 

1410 GOSUB 2620: ON R GOTO 1580,1620 
1420 LOCATE 9.10: PRINT "Ridere e scherz 
are: puoi farlo: 

il 

1430 LOCATE 16.15: PRINT "1 - solo con g 
li amici " 

1440 LOCATE 18,15: PRINT "2 - con chiuna 
u e " 

1450 GOSUB 2620: ON R GOTO 1380,1620 


1460 LOCATE 

9, 10: 

PRINT " 

La 

persona con 

cui -s±ai ti 

—moIla, 

il 

- Tu: 



1470 LOCATE 

16,15: 

PRINT 

" 1 

- la cerchi 

ancora 




ii 

1480 LOCATE 

18,15: 

PRINT 

ii 

— vorresti c 

ercarla ma 

non lo 

fai 


ii 


1490 GOSUB 2620: ON R GOTO 1420,1660 
1500 LOCATE 9.10: PRINT "Nella vita ti p 
iace: 

ii 

1510 LOCATE 16,15: PRINT "1 - gustarti i 
1 panorama 

1520 LOCATE 18,15: PRINT "2 - andare di 
corsa »• 

1530 GOSUB 2620: ON R GOTO 1460,1700 
1540 LOCATE 9.10: PRINT "Le cose della v 
ita fan piangere: 

ii 

1550 LOCATE 16,15: PRINT "1 - i poeti 

II 

1560 LOCATE 18,15: PRINT "2 - i deboli 

II 

1570 GOSUB 2620: ON R GOTO 1500,1740 
1580 LOCATE 9,10: PRINT "Secondo te riso 
lve più problemi: 

ii 

1590 LOCATE 16,15: PRINT "1 — un paio di 
schiaffi " 

1600 LOCATE 18,15: PRINT "2 — una seduta 
di psicanalisi " 

1610 GOSUB 2620: ON R GOTO 1620,1810 
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1620 LOCATE 9,10: PRINT "Al cinema vai a 
vedere solo film che: 

ii 

1630 LOCATE 16,15: FRINÌ "1 - decidi tu 

II 

1640 LOCATE 18,15: PRINT "2 - decidi in 
comitiva " 

1650 GOSUB 2620: ON R GOTO 1660,1940 
1660 LOCATE 9,10: PRINT "La frase che no 
n ti rivolgeranno mai: 

n 

1670 LOCATE 16,15: PRINT "1 - 'Forse ti 
ci vorrebbe un po' di coraggio'" 

1680 LOCATE 18,15: PRINT "2 ~ 'Ci hai ri 
flettuto abbastanza?' 1 

1690 GOSUB 2620: ON R GOTO 1700,2070 


1700 LOCATE 

9, 10: 

PRINT » 

Primo incontro 

intima. C'è 

ii 

un po ' 

d i emo 

zione? 

1710 LOCATE 

in 

tH 

>0 

7-4 

PRINT 

"1 - No, nessun 

problema ' 



ii 

1720 LOCATE 

18,15: 

PRINT 

"2 - Si 


1730 GOSUB 2620: ON R GOTO 1740,2210 
1740 LOCATE 9,10: PRINT "Se credi in una 
cosa vai fino in fondo? 

ii 

1750 LOCATE 16,15: PRINT "1 - Dipende da 
Ile circostanze " 

1760 LOCATE 18,15: PRINT "2 - Si 

ii 

1770 GOSUB 2620: ON R GOTO 2210,2340 
1780 

1810 PR*<0>=" 

PROFILO A" 

1820 PR$<1)=" Ave o re Tentenna, il or 
ande popolo degli indecisi saluta in t 
e il" 

1830 PR$(2)="suo indiscusso sovrano. Non 
un re guerrafondaio ( ci mancherebbe: 
e chi" 

1840 PR$(3)="te lo dà il coraggio?). No, 
tu non sei per la guerra contro le cert 
ezze:" 

1850 PR$(4)="tu, cosa siano le certezze, 
lo ignori proprio. La tua titubanza è 
ormai" t 

1860 PR$(5)="leggendaria, la tua ineert 
ezza talmente scontata da non rapprese 
ntare" 

1870 PR$(6)="neanche più oggetto di disc 
ussione. Dare un consiglio od offrire un 
con — " 

1880 PR$(7)»"franto è roba da farti veni 
re i sudori freddi. Anche se da questo 
punto" 

1890 PR$(8)="di vista puoi stare tranqui 
Ilo: ad un tipo come te non viene da chi 
edere" 

1900 PR$(9)="neanche un parere sul tempo 


1910 F0R B«10 T0 14 
1920 PR*(B>=" 

ii 

1930 NEXT B:GOSUB 2710:GOTO 2460 
1940 RR*(0)=" 

PROFILO B" 

1950 PR$(1)=" Fifone no, insicuro nepp 
ure; ma prudente- quello almeno ammetter 
ai di" 

I960 PR$(2)="esserlo. Un gesuita riposa 
nei tuoi panni: mai una mossa avventata 

, ra-“ 

1970 PR$ (3) = "ramente un gesto ftiori post 
o. Gli unici rischi che accetti di ass 
urne re 

1980 PR$ < 4 ) =" sono quelli che, a forza di 
essere calcolati, da un pezzo hanno s 
messo" 

1990 PR$(5)="di essere tali. Convinto c 
ome Demostene che soldato che fugge è 
buono" 

2000 PR$(6)="per un'altra battaglia, ti 
imbarchi solo in storie da cui sei sicur 
o di" 

2010 PR$(7)="scendere con la vittoria i 
n ta^ca. Ed anche se ti capita di incia 
mpare" 

2020 PR$<S>="in qualcosa di imprevisto, 
tu riesci a fare quello che è difficile 
anche" 

2030 PR$(9)="per un acrobata: cadere sem 
pre in piedi. 

ii 

2040 FQR B=10 T0 14 
2050 PR$( B ) =" 

n 

2060 NEXT B: GOSUB 2710: GOTO 2460 
207-0- js" 

PROFILO C" 

2080 PR$(1)=" 'C'è una ortidenza super 
iore a quella che di solito va sotto q 
uesto" 

2090 PR$(2)="nome: la prudenza dell aqui 
la, che consiste nel seguire coraggiosa 
mente” 

2100 PR$(3)=‘il proprio carattere, accet 
tando impassibile gli inconvenienti e le 
d is-" 

2110 PR$(4)="grazie che ne possono deriv 
are'. La citazione è lunga, me* ne vale 
va la" 

2120 PR$(5)="pena per mettere a fuoco ci 
ò che la tua naturale discrezione a volt 
e na-" 

2130 PR$(6)="sconde. Coraggiosa sempre p 
er necessità e mai per scelta, è dalla 
gente" 

2140 PP* (~7\ ="come te che vengono fuori 
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gli eroi più grandi perché più veri. N 
o, tu" 

2150 PR*<8)«"non sei un tipo deciso a tu 
tta: a te basta esserlo solo per ciò eh 
e ri-" 

2160 F'R* (9) ="tieni giusto. Ed in questo 
caso qualsiasi sacrificio diventa le 
cito." 

2170 PR*(10)="Sempre senza schiamazzi, n 
aturalmente. 

ii 

2180 F0R B=11 T0 14 
2190 PR*<B>=" 

n 

2200 NEXT B: G0SUB 2710: GOTO 2460 
2210 PR*<0>«" 

PROFILO D M 

2220 PR♦(l)*" Coltivare l'incertezza n 

on è tra le tue attività preferite. Ti 
piace" 

2230 PR*(2)="prender decisioni, questo è 
certo; ma soprattutto non ami subire q 
uelle" 

2240 PR*<3)«"altrui. Accorte e precise s 
ono le tue valutazioni prima di entrare 
in a-" 

2250 PR*(4)="zione. Il dubbio ti può mac 
erare: ma una volta tratto il dado, fer 
marti" 

2260 PR*<5)="è dura, importi traccheggia 
menti impossibile. Perchè per te l'esita 
zione" 

2270 PR*(6)="è un mostro da fuggire, la 
rinuncia un atto estremo di vigliaccheri 
a. Se" 

2280 PR*(7)="è vero che l'umanità si div 
ide in uomini di serie A e di serie B, i 
t ipi " 

2290 F‘R* (8) ="come te non si accontentan 
o di partecipare ai campionati della ma 
ssima" 

2300 PR*(9)="serie: loro obiettivo è di 
vincere lo scudetto. 

n 

2310 F0R B=10 T0 14 
2320 PR*(B) «" 


2330 NEXT B: G0SUB 2710: GOTO 2460 
2340 PR*(0) *" 

PROFILO E" 

2350 PR*(1)=" Decisa a tutto. Ed anche 
a qualcosa di più. Cosi ti piace farti 
vede-" 

2360 PR*(2)«"re, cosi probabilmente gli 
altri ti guardano. Tu non hai mai dubbi, 
vuoi " 

2370 PR*(3)«"andare sempre e comunque dr 
itto per la tua strada, travolgendo se n 


eces-" 

2380 PR*(4)="sario gli ostacoli senza 
guardare in faccia nessuno, se occorre 
. Una" 

2390 PR*(5)="volta prese le decisioni pe 
r te hanno la forza del granito, 1'inel 
ut ta-" 

2400 PR*<6)="bi1ità del destino. Ti accu 
sano a volte di ottusità, di una scarsa 
prò-" 

2410 PR*(7)="pensione alla riflessione? 
Che facciano: a te tutto questo ciarlar 
e non" 

2420 PR*(S)«"scuce un baffo. Sennò che r 
azza di decisionista saresti? 

ii 

2430 F0R B=9 T0 14 
2440 PR*(B)=" 

ii 

2450 NEXT B: GQSUB 27ló 

2460 LOCATE 2-1,14: PRINT "Vuoi la stampa 
del profilo? (1 - Si ; 2 - No) " 

2470 G0SUB 2620: IF R=1 THEN G0SUB 2800 
2480 LOCATE 23.14: PRINT "Vuoi rifare il 
test? " 

2490 G0SUB 2620: IF R«1 THEN RUN 
2500 CLS: END 
2510 ' 

2540 REM - 

2550 REM Subroutine grafica 

2560 REM --- 

2570 F0R CI=1 T0 CF: PRINT NEXT CI 

2580 RETURN 
2590 1 

2620 REM - 

2630 REM Subroutine di scelta 

2640 REM - 

2650 R*«INKEY*s IF R*«"" THEN 2650 
2660 R«VAL(R*>: IF R<1 OR R>2 THEN BEEP: 

GOTO 2650 
2670 RETURN 
2680 ' 

2710 REM-— 


2720 REM Subroutine di visualizzasi 

one 

2730 REM - 


2740 LOCATE 12,3: PRINT " jj " : LOCATE 12, 
77: PRINT " II" 

27-50-, FOR -V=0 TQ 1 4* LQQ^I^ 6+V,5s PRINT 
PR*(V): NEXT V 
2760 RETURN 
2770 ' 

2800 REM - 

2810 REM Subroutine di stampa 

2820 REM - 

2830 FOR S=0 TO 14: LPRINT " "; PR*(S 

): NEXT S 
2840 RETURN 

_ci 
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Sistemi 

MSX 


Ancora non esisteva una versione 

commerciale di questo famoso Arcade . LIST ve lo propone in ver¬ 
di MAURO MARINIUI sione Home Game, per i fortunati possessori di computer MSX 


DUBBIO 

IL DRAGHETTO SPARA... BOLLE 


n altro strano personaggio !?! 

Questa volta me lo perdonerete: non ho saputo resi¬ 
stere. In giro, per I’ MSX non c’è versione commercia¬ 
le di questo famoso ARCADE, da cui prende spunto 
questo gioco. Bubble Bobble per chi non lo avesse 
capito è stato l’ispiratore di questo software. Rivedrete il draghetto 
(solo uno per varie e dolorose motivazioni...) che spara bolle e in¬ 
trappola i perfidi nemici. 

Essi in tutto sono sei per ogni quadro e, solo quando li avrete elimi¬ 
nati tutti, allora passerete al successivo schema. Il gioco fa uso 
esteso degli sprites tanto da definirne ben 24 per tutte le fasi del 
gioco. 

Lo scopo del gioco, per chi ancora non lo conoscesse, è quello di 
intrappolare uno alla volta con delle bolle sparate dal pulsante del 
joystick, dei mostriciattoli che si aggirano per il video in cerca pro¬ 
prio di voi. Una volta intrappolati nelle bolle, cominceranno a salire 
su per il labirinto, ma, se non li schiaccerete in tempo, si libereranno 
e torneranno a rovinarvi la festa. Fate attenzione che con l’avanzar 
dei livelli la loro belligeranza e cattiveria aumenterà! Fate anche at¬ 
tenzione ad uscire dal video, può esservi fatale! 

Rimanendo in tema, si muore toccando gli odiati fantasmazzi, però 
non temete, la tolleranza è sufficiente (almeno nei primi livelli, 
eh,eh!) per qualche manovrina azzardata. Un consiglio? Modifica¬ 
te i quadri! In questo gioco li ho inventati io, di sana pianta, non 
ispirandomi alla macchina da bar. 

Concludo qui questa spiegazione, passando al commento del li¬ 
stato, tanto per farvi pregustare ancor di più il gioco che tra poco 
digiterete ! 

0-190 preparazione dello schermo, inizializzazione e MAIN LOOP, 
che contiene: animazione dei nemici, animazione delle bolle (in¬ 
grandimento , esplosione ecc.), e movimento del nostro eroe. 
200-240 routine che gestisce il colpo del nostro drago. 

250-270 hai preso un nemico, schiacciandolo quando è intrappo¬ 
lato nella bolla, cento punti e un po’ di animazione. 

280-390 questa volta hanno preso te: se hai finito gli omini, sei ...FI¬ 
NITO ! 

400-570 disegno del campo da gioco, con notizie sempre aggior¬ 
nate, più i cinque quadri da risolvere. 


580-610 loop del caricamento dati. 

820-860 ecco i dati per gli sprites. Vedrete che animazioni, con 24 di 
questi !! 

Óra vorrei proporvi una serie di modifiche che non ho voluto ese¬ 
guire per non “intasare” il programma: è possibile, senza modifica 
alcuna al main loop, far stampare alcune “leccornie”, sia random 
sia quando eliminate un nemico. Usate la funzione FNQQ(II) dove 
II, da 0 a 5 rappresenta uno dei sei nemici. 

Per controllare se avete con il drago raccolto o meno il carattere (o 
più d'uno se volete fare le cose in grande), fate il VPEEK(fnq) = 
quel dato codice; allora punti e musichetta. È possibile inserire an¬ 
che un contatore, usando la variabile TIME, aggiungendo all’inizio 
della linea 50 LOCATE dove-ti-pare PRINT TIME: poi, alla fine della 
linea un ELSE IF TIME maggiore (>) di quanto ne vuoi, allora GOTO 
280. Da notare che il LOCATE 0,0 è solo per questo. 

Voglio sottoporvi, inoltre, alcune risposte a dei problemi (nulla di 
esistenziale, per il momento) accennati prima, in riguardo al solo 
drago, contro i due della versione da BAR. 

Innanzitutto la velocità: il gioco sarebbe divenuto parecchio più 
lento, e precisamente, sarebbe dimezzata. Ma ciò si sarebbe potuto 
anche accettare, data la scioltezza del tutto, sobbarcarlo un po’ 
non avrebbe prodotto gravi danni. Altro problema, sul dannatissi¬ 
mo MSX1 (eppure dispensatore di tante gioie!) è il problema dei 
quattro sprites per linea, un gran bel problema. Si sarebbe potuto 
optare per un drago monocolore, direte voi, invece che bi-cromati- 
co come sono solito farli. Però, se i due sono sulla stessa linea (ca¬ 
so frequente, garantito) e bersagliano qualche nemico, gli sprite to¬ 
tali sono quattro per i palloncini e per i draghi, e due di troppo per il 
cattivo. Conclusione qualcuno sparirà (saranno forse i più furbi o i 
cretini di ogni età). Perdonatemi Dalla, ma se volevamo farne una 
conversione per MSX1, o facevamo un pastrocchio monocromati¬ 
co come spesso se ne vedono sui nostri video casalinghi, oppure 
sceglievamo la qualità, e limitavamo le nostre ambizioni. Bisogna 
sapersi accontentare, specialmente se lavoriamo solo col BASIC! 
Il programma come potrete vedere, ha un’architettura pulita e 
aperta; si può modificarlo a piacimento, aggiungere quadri e varie 
peripezie, come del resto sempre, con i miei giochi. Ci lasciamo così 
con questa ultima per questo numero, impennata egocentrica! 
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0 ' 

1 « 

2 BUBBLO!^ 

3 ^ 

4 ’^I MAURO MARINILLI (88)^ 

5 « 

6 PER LE EDIZIONI LIST. ^ 

7 ^ 

3 

9 * 

10 CLEAR1000:SCREEN1,2:VIDTH31; COLOR15, 1 
,1j KEYOFF:KEY1," run2”+CHRSC13):GOSUB580 
20 DEFINTA-Z:VT=3:LV=1:J=0:DI(0)=1:DI(2) 
=-l:X=100:Y=104:PUTSPRITEI,(X,Y),10,1:PU 
TSPRITE2, <X,Y),4,2 

30 ON STRIO GOSUB200,200,200:STRIGCJ) ON 
: FQRI=0TO5: DXC I ) =2: X<I ) =2: YCI)=1*32+7: NE 
XT:GOSUB430 

40 DEF FNQ=6145+INT(X/8)+ INT(Y/8)*32+64 
:DEFFNQQ<L)=6177+INT (X (L)/8 ) + INT (Y <L)/8) 
*32 

50 LOCATEO, 0: IF VPEEK(FNQ-64)>223 ORVPEE 
K <FNQ-63)>223THEN280 

60 IF STICK(J)=3THENX=X+4:PUTSPRITE1, CX, 
Y),11,1+A*4:PUTSPRITE2, <X,Y),5,2+A*4:A=A 
+1ANDA<1:D=0 

70 IF STICK(J)=7THENX=X-4:PUTSPRITE1,(X, 
Y),11,3+A*4:PUTSPRITE2, CX,Y),5,4+A*4:A=A 
+1ANDA<1:D=2 

80 IF F>0 THENF=F-1:ON F GOTO 90,100,110 
,120,170 

90 PUTSPRITE30, CIX,IY-8),0,0:SOUND8,0:GO 
T0130 

100 PUTSPRITE30, CIX,IY-12 ) , 9,21 :SOUND8,6 
:SOUNDO,255:GOT0130 

110 PUTSPRITE30,(IX,IY-8),4,19:GOTO130 
120 PUTSPRITE30,(IX,IY-4),5,18:GOT0130 
130 IF VPEEK(FNQ>0219 AND FF=0 THENY=Y+ 
8:PUTSPRITEI, (X,Y), ,9+D:PUTSPRITE2, CX,Y) 
,,10+D ELSE IF FF>0 THENFF=FF-1:Y=Y-8:PU 
TSPRITE1, CX,Y),,9+D:PUTSPRITE2, CX,Y),,10 
+D:ELSE IF STICK(J)=l THEN FF=4 
140 L=L+1ANDL<5:IF Y(L)=0 THEN 50 
150 VPOKEFNQQCL),32:PUTSPRITEI0+L, (XCL), 
YCL) ) ,4+ACL),23+ACL): ACL)=ACL)+1ANDACL)< 
1: X(L)=X (L)+DX CL):VPOKEFNQQCL),224+L: IFX 
CL)<OORXCL)>240 THENDXCL)=-DXCL) 

160 GOTO 50 

170 F=6:PUTSPRITE30, CIX-l+RND(1)*2,IY),8 
,20:FK=FK+1:IY=IY-LV:IF FK>32 THEN SOUND 
9,12:SOUND3,20 :F=2: X(UU)=RNDC1)*232 : Y(UU 
)=UU*32+7:SOUND9, 0 

180 IF X+10>IX AND X-10CIX AND Y-10CIY A 
ND Y+10>IY THEN250 
190 GOTO 130 

200 IF F=0 THEN PUTSPRITE1, CX,Y),11,13+D 
:PUTSPRITE2, CX,Y),5,14+D:U=180:S0UND8,13 
:FORI=XTOX+32*DICD)STEPDICD)*2:U=U-1:SOU 


NDO,U:PUTSPRITE30, CI,Y+2),7,17 ELSE RETU 
RN 

210 UU= VPEEK C6145+1 NT C I /8 ) +1 NT C Y/8 ) *32 
):IFUU>223 THEN 230 

220 NEXT: IX=I: IY=Y:F=5:SOUND8,0: RETURN 
230 FK=0: IX=I: IY=Y:F=6:PUTSPRITEI0+ (UU-2 
24),,,19:SC=SC+10:LOCATE6,0:PRINTSC:FORI 
= 0TQ255STEP2:SOUNDO, I :NEXT:SOUND8,0:UU=U 
U-224:PUTSPRITEI0+UU, , ,0:VPOKEFNQQ CUU),3 
2:Y(UU)=0:RETURN 
240 RETURN 

250 SOUND1,1:FORI = OT0255STEP12: SOUNDO, I: 
SOUND8,10+RNDC1)*3 :SOUND3, I :NEXT:S0UND8, 
7:FORI=1T020:PUTSPRITE30,,14+A,22:A=A+1A 
NDA<1:SOUND1, I :NEXT:SC=SC+100:L0CATE6,0: 
PRINTSC:FM=FM+1:YCUU)=0: F=4 
260 IF FM>5 THEN FM=0:BEEP:PLAY”S1M90000 
5T250D8. C+DFA+8. A+AA+06C04A+AA+DFA8. ”, M S 
1M900005T250D8.C+DFA+8.A+AA+06C04A+AA+DF 
A8. **, ”S1M1160005T250D8. C+DFA+8. A+AA+06C0 
4A+AA+DFA8. 99 : GOT0400 
270 SOUND1,0:SOUND8,0:GOTO 50 
280 STRIG CJ)OFF: * MORTE DI UN DRAGHETTO 
290 SOUND1,1:SOUND8,12:S0UND9,12:FORI=OT 
0255STEP6:U=INT(RNDCI)*3 + 1)*4+D: PUTSPRIT 
El, , ,1+U:PUTSPRITE2, , ,2 + U:SOUNDO, I : SOUND 
2,255-I :NEXT:FORI=255TOOSTEP-12 :SOUND9, I 
/2: SOUNDIO, I.-SOUND8, I/16:S0UND1, I : NEXT 
300 VT=VT-1:IF VT<1 THEN 310 ELSE GOSUB4 
30:X=100:Y=104:PUTSPRITE1, CX,Y),10,1:PUT 
SPRITE2, CX,Y),4,2:STRIG(J)ON:GOTO 50 
310 9 GAME OVER:A=0:BEEP:CLS:G0T0154 
320 A=A+1ANDA<1:ONA+1 GOT0340,370 
330 IF STRIGCJ) THEN RUN20 ELSE 320 
340 LOCATEO,10 

350 PRINT” • * ooooo o oo o ooooo . , 

a • O OOOOO aa aaO 

O OOOOO a a ..OOO O OO 


O o o 


o o o 


o o o 


360 GOTO 330 
370 LOCATEO, 10 
380 PRINT" ° ° 

O O . 


o o 


o o 


o o ooooo 


o o o o 



o 


o 


o 


390 GOTO 330 

400 • FINE DI UN QUADRO 

410 CLS;LOCATE4,10 :PRINT”PROSSIMA SCENA: 
”LV+1:LV=LV+1:FORI=1T06500:NEXT:IFLV>8 T 
HENLV=1 

420 X=100:Y=104:PUTSPRITEI, CX,Y),10,1:PU 
TSPRITE2, CX,Y),4,2:GOSUB430:GOTO 30 
430 CLS:PRINT”PUNTI :”SCTABC14)”SCENA”LVT 
AB(24)”VITE”VT:VPOKE8219! , (LV+1)*16 
440 FORI = 0TO5:DX CI)=LV*2: IFLV=5THENDX(I) 
=8:NEXT: ELSE NEXT 
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450 ON LV GOTO 460,480,500,520,540,460,5 
40,480 

460 DX=2:FORI=3T023STEP8:LOCATE1,1+4:PRI 
NTSTRING$ (29,219 ) ; :LOCATE2, I : PRINT"HHH 
VTAB(19>”HI HHH' ; :NEXT: F0RI = 1T05S 
TEP2:X<I)=212:DX<I)=-DX<I):NEXT 
470 RETURN 

480 FORI=3T023STEP8: LOCATE1, 1+4:PRINTSTR 
I NG$ < 13, 219 ) •• •• STRI NG$ <13,219);: LOCATE2 

, I : PRI NT” HI WM HT TAB < 17 ) ” |H ■| flH’ ! 

:NEXT:F0RI = 1T05STEP2: X<I)=212:DX<I)=-DX< 
I):NEXT 
490 RETURN 

500 FORI=3T023STEP8:LOCATE1, I+4:PRINT M 

I NT" Hi Hi IV TAB (17)” Hi 'hi HI’ ; : NEXT 
:F0RI = 1T05STEP2: X <I)=212 :DX <I)=-DX <I): NE 
XT 

510 RETURN 

520 FOR I =3T023STEP8 : LOCATE1, 1+4: PRI NT»’ 

HI ■ ; : LOCATB2, I : PR 

I NT" HT TAB < 17 ) " HT J : NEXT : FOR I = 1T05STEP2 : 
X ( I ) =212 : DX ( I ) =-DX ( I ) : NEXT 
530 RETURN 

540 FORI=3T023STEP8:LOCATE1, 1+4:PRINT"HI 

mummmmmmuM ht ; : locate 2 , i ? 

PRINT"! ■ ■ ■’TAB(19)"B ■■■’;: NEX 

T:F0RI = 1T05STEP2: X(I)=212 :DX <I)=-DX(I):N 
EXT 

550 RETURN 
560 RETURN 

570 FORI = 0TO30;PUTSPRITEI, , ,0:NEXT:END 
580 PRINT" oooo o o oooo oooo o ooo 

ooooooooo o oooo 

OOO OO O O 00 OO 00 00 


00 o o oooo oooo oooo oooo oooo 
ooo 

590 LOCATE6,10:PRINT"SCRITTO PER MSX DA 
:":L0CATE5,12:PRINT"MAURO MARINILLI <198 
8)";F0RI=14336+32T014336+32*26-l:READU:V 
POKEI,U:VPOKE8193,U:NEXT 
600 FORI=224*8T0230*8-1:VPOKEI,0:NEXT 
610 RETURN 

620 DATA 1,1,11,7,15,31,15,6,12,28,14,7, 

15,23,3,0,192,48,124,248,192,252,248,224 

,112,56,24,184,240,224,208,160 

630 DATA 0,10,20,8,16,32,16,9,19,35,17,8 

,16,40,120,1,0,192,128,0,0,0,0,0,128,192 

,224,64,0,0,40,88 

640 DATA 3,12,62,31,3,63,31,7,14,28,24,2 
9,15,7,11,5,128,128,208,224,240,248,240, 
96,48,56,112,224,240,232,192, 0 
650 DATA 0,3,1,0,0,0,0,0,1,3,7,2,0,0,20, 
26,0,80,40,16,8,4,8,144,200,196,136,16,8 
,20,30,128 

660 DATA 1,1,11,7,15,31,15,6,12,24,12,6, 
15,23,3,1,192,48,124,248,192,252,248,224 
,112,120,56,104,208,224,136,176 
670 DATA 0,10,20,8,16,32,16,9,19,39,19,9 
,16,40,120,0,0,192,128,0,0,0,0,0,128,128 


,192,144,40,24,112,64 

680 DATA 3,12,62,31,3,63,31,7,14,30,28,2 
2,11,7,17,13,128,128,208,224,240,248,240 
,96,48,24,48,96,240,232,192,128 
690 DATA 0,3,1,0,0,0,0,0,1,1,3,9,20,24,1 
4,2,0,80,40,16,8,4,8,144,200,228,200,144 
, 8, 20,30, 0 

700 DATA 1,1,11,7,13,24,12,4,14,31,15,7, 
15,23,3,1,192,176,60,248,192,252,120,32, 
48,120,248,252,220,152,176,64 
710 DATA 0,10,20,8,18,39,19,11,17,32,16, 
8,16,40,120,0,0,64,192,0,0,0,128,192,192 
,128,0,0,34,102,76,176 

720 DATA 3,13,60,31,3,63,30,4,12,30,31,6 
3,59,25,13,2,128,128,208,224,176,24,48,3 

2.112.248.240.224.240.232.192.128 

730 DATA 0,2,3,0,0,0,1,3,3,1,0,0.68,102, 
50,13,0,80,40,16,72,228,200,208,136,4,8, 
16,8,20,30,0 

740 DATA 0,0,11,7,15,31,15,6,12,28,56,28 
,15,23,3,0,112,204,254,192,0,224,254,248 
,112,56,120,248,240,224,208,160 
750 DATA 0,11,20,8,16,32,16,9,19,35,71,3 
5,16,40,120,1,128,48,0,0,0,0,0,0,128,192 
,128,0,0,0,40,88 

760 DATA 14,51,127,3,0,7,127,31,14,28,30 
,31,15,7,11,5,0,0,208,224,240,248,240,96 
,48,56,28,56,240,232,192,0 
770 DATA 1,12,0,0,0,0,0,0,1,3,1,0,0,0,20 
,26,0,208,40,16,8,4,8,144,200,196,226,19 

6.8.20.30.128 

780 DATA 1,3, 7,6,3, 1,0, 0, 0, 0, 0, 0, 0, 0, 0, 0 
,128,192,96,224,192,128,0,0,0,0,0,0,0,0, 
0, 0 

790 DATA 3,7,15,31,31,31,31,13,7,3,0,0,0 
,0,0,0,192,224,176,216,216,248,248,240,2 
24, 192, 0, 0, 0, 0, 0, 0 

800 DATA 0,3,15,31,31,63,63,63,63,63,23, 

27,15,3,0,0,0,192,240,152,200,204,236,23 

6,252,252,248,248,240,192,0,0 

810 DATA 0,7,24,39,45,89,91,95,95,94,93, 

47,39,24,7,0,0,224,24,228,180,154,218,25 

0,250,122,186,244,228,24,224,0 

820 DATA 240,152,136,152,240,195,198,4,4 

,4,70,3,0,32,4,0,0,32,4,0,0,130,192,64,6 

4,64,209,153,21,19,17,17 

830 DATA 68,1,16,1,68,1,43,1,64,4,1,144, 

51, 18, 18,59,68,0,17,0,68,0,170,0,4,64,8, 

0, 185,168,168,186 

840 DATA 0,15,31,61,57,59,127,127,127,59 
,127,125,63,127,119,34,0,240,248,188,156 
,222,254,254,252,238,126,220,254,254,118 
,34 

850 DATA 0,15,31,61,57,123,127,127,63,11 
9,126,59,127,127,123,81,0,240,248,188,15 
6,220,254,254,254,220,254,190,252,254,23 
8,68 

860 DATA 15,63,123,113,123,63,31,15,7,15 
,5,13,8,21,165,72,240,252,222,142,222,25 
2,248,240,224,240,80,80,140,98,18,200 
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PROGRAMMI 

Sistemi 

Questo videogame è nato da una 

MSX 


scommessa tra amici: a voi il compito di giudicare chi ne è stato il 

di MAURO MARINILLI vincitore 


Fingo Pongo 

Squash 


iù di un anno fa la TAITO, gloriosa casa di videogio¬ 
chi ARCADE, presentò ARKANOID, rifacimento a 
sorpresa del taumaturgico BREAK-OUT, chiamato 
OUTLAW e chissà in quanti altri modi ancora.. 

Il caso volle che il giorno che andai a fare la visita di 
leva per la Marina, nella caserma di La Spezia, ve ne trovai uno; 
sotto le fenditure per le monete c’era scritto 100 Yen. 

Rabbrividii... Guardandolo meglio notai l’età e la provenienza... 
Quanti giri aveva fatto "quell’accrocco”! Lo schermo poi, era in 
bianco e nero, colorato con tre strisce di plastica. Un vero obbrob- 
bio; non perché sia contro le antichità, ma farci giocare un povero 
ragazzo abituato a ben altre delizie mi sembra troppo. 

Forse avrete capito che ho sempre odiato quei giochi a “paddle”, 
in cui per colpire la pallina bisogna avere una precisione certosina, 
ed io che sono un impulsivo frenetico, proprio non li digerisco que¬ 
sti giochi. Eppure, sotto ripetute pressioni di amici che “bramava¬ 
no” avere una versione di ARKANOID in casa, e che hanno addirit¬ 
tura osato sfidarmi alla sua realizzazione, ho ceduto e... l’ho realiz¬ 
zato. 

Beh, perdonatemi questa storiella sulla visita di leva, trascurate i 
miei vaniloqui sui vari “BREAK + FICTION”, ognuno ha i suoi mo¬ 
menti di debolezza specialmente quando è messo davanti a dei 
giochi che ha sempre disdegnato. E non pensate che sia snobismo, 
ma io l’unica volta che ho avuto il coraggio di infilare una monetina 
da 200 lire dentro un Arkanoid (fortuna che non m’ha visto nessu¬ 
no) ho abbattuto appena quattro, dico quattro, mattoncini e ho 
perso 3 racchette. 

Reduce da questi traumi, la mia versione è stata ampiamente rima¬ 
neggiata. Ho eliminato gli oggetti svolazzanti, che andavano colpiti 
con la pallina o con la racchetta, ho aggiunto diversi quadri e, par¬ 
ticolare molto interessante, l’ho riempito di poteri e opzioni. Ho in¬ 
cluso il bazooka, indicato con l’involucro “B”, la colla “C”, che at¬ 
tacca la pallina alia racchetta, la lettera "L” con doppio potere: al¬ 
cune volte causa uno sdoppiamento, ovvero due racchette mosse 


contemporaneamente, altre volte provoca il “large”, cioè l’allunga¬ 
mento della racchetta (effetto molto riuscito, vedrete). Abbiamo poi 
la scritta CBM: guai a voi! 

Un MSXiano che si rispetti deve sempre evitare i Commodoristi! 
Naturalmente scherzo... Comunque se prenderete questo oggetto 
la maledizione ricadrà su di voi: la pallina viaggerà a velocità verti¬ 
ginosa e vi distruggerà la racchetta. 

Ci sono poi i bonus: la rarissima scritta MSX, se colpita, vi elargirà 
moltissimi punti. 

La scritta MSX di colore diverso (la si può notare anche sul monitor 
a fosfori verdi o B/N), invece, vi rovinerà completamente. Tralascio i 
disastri che è in grado di provocare, per avvertirvi che è tutta que¬ 
stione di “stick” e che se colpita in un certo modo può darvi parec¬ 
chi vantaggi... Non posso dirvi di più. 

Altri particolari lascio che li scopriate da soli. 

Vi anticipo che il gioco ha tre livelli differenti: si passa da un primo 
quadro semplice ad uno “medio”, dove i blocchi indistruttibili fan¬ 
no la loro comparsa, per finire con il terzo e più impegnativo livello. 
Naturalmente per chi volesse divertirsi a realizzare nuovi scenari 
per le sue partite (un po’ come va di moda ora,.con tutti questi cloni 
per computer a 16/32 bit), do un piccolo prontuario per la “perso¬ 
nalizzazione” del game. 

Bisogna innanzitutto modificare la linea 1070, e aggiungere dopo il 
terzo livello (linea 1250) la linea dove comincerete a creare il vostro 
nuovo quadro. 

Date poi uno sguardo alla linea 1090: le variabili “E” ed “E1” rap¬ 
presentano rispettivamente le coordinate X ed Y del punto da dove 
verrà stampata una fila di mattoncini. 

Modificate il colore presente nell’istruzione LINE, in modo da defini¬ 
re l’altezza di un mattoneino: questo farà in modo che quando la 
pallina colpirà una mattonella, il programma individui la sua posi¬ 
zione. 

Potete variare, inoltre, lo step finale di I che in questa linea vale 10: 
si può così cambiare il numero di mattoncini per fila. 
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Ricordate che i colori dei mattoncini variano secondo la fila in cui si 
trovano. Procedendo dall’alto verso il basso i colori sono i seguenti: 
colore numero 8 per la fila superiore, colore 5 per la successiva fila 
di coordinata Y = 40, colore per la fila con Y = 56, colore 3 per quel¬ 
la di altezza Y = 72, colore 10 per la fila con Y = 88 ed infine colore 
numero 6 per l'ultima fila in basso di altezza Y=104. 

Abbiamo quindi un totale di 60 blocchi al massimo, i quali sono fis¬ 
si: cioè il programma andrà a cancellare uno di questi blocchi alle 
coordinate dove “crede” che esso sia (vedi a questo proposito le li¬ 
nee dalla 500 in poi). 

I blocchi di colore 15 (che rappresentano la vera e propria ossatura 
strategica del gioco nei livelli più avanzati), sono indistruttibili: 
quando la pallina toccherà uno di questi mattoni bianchi vi rimbal¬ 
zerà contro, emettendo un particolare rumore. 

È pure possibile modificare le caratteristiche di ogni singolo “pote¬ 
re” o addirittura inventarne di nuovi. 

Inoltre si può letteralmente stravolgere il gioco, ad esempio facen¬ 
do muovere tre palline contemporaneamente, oppure aggiungere 
dei blocchi speciali (differenti da quelli presenti nella linea 500 e 
successive), con ulteriori opzioni e tante altre idee che non ho volu¬ 
to implementare, sia per non allungare troppo il listato, sia per invo¬ 
gliarvi alla auto-produzione. 

Ed ora tuffiamoci (l’estate è ormai alle porte) nel listato. 


COMMENTO AL LISTATO 

0-40: 

presentazione, inizializzazione dello schermo, delle variabili e dei 
controlli vari 

50-100: 

MAIN LOOP (chi non sa cosa significa si arrangi!) 

110-190: 
controlli vari 

200-480: 

assegnazione dei poteri al giocatore 
490-610: 

subroutine del rimbalzo della pallina 
620-800: 

stampa una delle tante opzioni che scendono sullo schermo 
810-850: 

routine di sparo per l’opzione del BAZOOKA 
860-950: 

che peccato: hai perduto una pallina! 

960-1020: 

GAME OVER 

1030: 

questa linea resetta il sistema. Se la partita sta prendendo una 
brutta piega non tagliatevi le vene, sporcando inutilmente la tastie¬ 


ra: premete invece FI che è più salutare... 

1040-1320: 

ecco qui i tre livelli di cui abbiamo parlato prima 
1330-1370: 

routine di presentazione. Come al solito, mentre stampa il titolo del 
gioco, il programma legge di nascosto i DATA degli sprite 

1380-1500: 

ogni bella storia che si rispetti finisce bene: la nostra finisce con i 
DATA! 

VARIABILI 

PL= numero di palline in dotazione al giocatore (per modificare la 
dotazione iniziale di “vite” vedere alla linea 20) 

LV= livello di gioco in corso 

XX = variabile X della racchetta 

X,Y,DX,DY,V= variabili riguardanti la pallina: coordinate e coeffi¬ 
cienti di spostamento 

WW,X2,Y4,Y5,ecc. = variabili della racchetta per l'animazione dello 
sprite 

F,FO= flag per l’oggetto BONUS da raccogliere 
SC= punteggio 

C,W,PY = colore dell’oggetto toccato dalla pallina e coordinate x,y 
della stessa 

PA= numero di blocchi colpiti in quel determinato livello. Quando 
PA è uguale a PF, significa che hai terminato il quadro. Vedere la li¬ 
nea 790 

PF= numero di blocchi presenti all’inizio di quel livello: 
Ricordatevene quando andrete a costruire nuovi quadri 

E,E1 = sono le variabili x,y per la stampa dei blocchi 

Ed ora passiamo alla descrizione delle linee DATA: 

SPRITE1 è la fantomatica pallina! 

SPRITE2 è la racchetta mossa dal joystick 

SPRITE3 e SPRITE4 sono la sezione sinistra e destra della racchetta 

LARGE 

SPRITE5 e SPRITE6 sono il bazooka-racchetta e la “cannonata” 

SPRITE7 e SPRITE8, esplosione ... della racchetta 

SPRITE9 è il potere “C”, ovvero la colla 

SPRITE10 è il potere “B” per il bazooka 

SPRITE11 è il potere “L”, LARGE 

SPRITE12 è la scritta MSX 

SPRITE13 è la scritta CBM 

Come vedete, nonostante gli sprite siano molti, il numero di DATA è 
piuttosto limitato. Come vi spiegate questo fatto? 
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0 ######################## ##### 
################### # PINGO PONGO SQ 

UASH ! !# ######################## 

######################## (W)1988 

BY MAUERSOFT oooooooooooooooooooo 

o o o o 

1 KEY6,"COLOR15"+CHR$ <13 >:SCREEN1,2 : COLO 
R15,1,4:KEY1,”run2”+CHR$(13):GOSUB134 

2 DEFINTA-Z:SCREEN2: OPEN”GRP:"AS#1: CLS: C 
OLOR,,4:PL=4:GQSUB105:ONKEYGOSUB104:KEY( 
DON 

3 ONINTERVAL=5GOSUBl1 : INTERVALON:ONSTRIG 
GQSUB82,82:STRIG(l)ON:ONSPRITEGOSUB14 :SP 
RITEON:SOUNDO,200 :S0UND8, 16:SOUND12,20 

4 XX=100:DX=-2:D=l:DY=-2:PUTSPRITE2,(100 
,180),9,2:PUTSPRITE3,(XX+4,176),4,1:F=9: 
XDBASE < 13 ) + 9 : X2=BASE ( 13 ) +13 : Y4=BASE ( 13 ) 
+16:Y5=BASE(13)+20:F=9:V=2:VV=4 

5 IFF=9THEN7 

6 PUTSPRITE1, <X,Y),4,1:X=X+DX;Y=Y+DY: IF 
POI NT(X+DX+2,Y+DY+2)< >1THENC=P01NT(X+2+D 
X,Y+2+DY):V=X+2+DX:DX=V*SGN(-DX)+RND(1)* 
SGN(-DX):DY=V*2*SGN(ABS(DY))+RND(l):GOSU 
B49 

7 IFSTICK(1)=3ANDXX<230-VVTHENXX=XX+6: VP 
OKEX2,XX+WW:VPOKEX1,XX:D=1 

8 IFSTICK(1)=7ANDXX>8THENXX=XX-6:VPOKEX1 
, XX: VPOKEX2,XX+WW:D=-l 

9 IFF=1THENVP0KEY4,VPEEK(Y4)-8:IFVPEEK(Y 
4)<17THENF=0:PUTSPRITE4, , ,0 ELSE IFPOINT 
(XO+8,VPEEK(Y4))< >lTHENW=X0+8:C=POINT(XO 
+8,VPEEK(Y4)):GOSUB50:PUTSPRITE4,,,0:F=0 

10 GOTO 5 

11 IFFF=1THENVP0KEY5,VPEEK(Y5)+2 : IFVPEEK 
(Y5)>202THENFF=0 

12 RETURN 

13 GOTO 5 

14 IFY>173THEN17 

15 IFVPEEK(Y5)>176ANDFF=1THENP=P0:VV=0:V 
=2:PUTSPRITE4, , ,0 :VPOKEY5,240 :0NPG0T022, 
33,26,40,46,36,29 

16 RETURN 

17 IFSGN(DY)=1ANDP=3THENG0T026 

18 DY=-ABS(DY):DX=ABS(DX)*D:SOUND1,15:SO 
UND13,1:PUTSPRITEI,(X,Y-4):Y=Y-8:IFSTICK 
(1)>0THEN20 

19 DX=SGN(DX) 

20 RETURN 

21 *###large 

22 SPRITEOFF:F0RI=1T016:PUTSPRITE2,(XX-I 
/2,180),9,3:PUTSPRITE3,(XX+I/2,180),9,4: 
S0UND9, 15 :SOUND2, I :SOUND3,2 :NEXT:SOUND9, 
0 :S0UND3,0 

23 LINE(0,0)-(72,8),15,BF:FORI=1T03:PSET 
(8+1,0),1:C0L0R4:PRINT#1, M LARGE” : NEXT 

24 PUTSPRITE2, (XX,180),9,3:PUTSPRITE3, (X 
X+16,180),9,4:WW=16 

25 SPRITEON:RETURN 

26 SOUND13,4:PUTSPRITE1,,,0:PUTSPRITE3,( 
XX+4,176),4,1:VV=4:PUTSPRITE2,,13,2:PUTS 


PRITE1,,,0 

27 IFFP=OTHENFP=1:LINE(0,0)-(72,8),15,BF 
;F0RI=1T03:PSET(8+1,0),1:COLOR4:PRINT#1, 
"COLLA":NEXT 

28 F=9:RETURN 

29 IFSTICK(1)=1THEN43 

30 SOUND12,70 :SOUND7,243 :S0UND6,29 : SOUND 
13,1:PUTSPRITE2,,,7:PUTSPRITE3,,,7*SGN(V 

W) 

31 LINE(0,0)-(72,8),15,BF:F0RI=1T03:PSET 
(8+1,0),1:COLOR4:PRINT#1,"KAPUTT!":NEXT: 
G0T097 

32 • #### BAZOOKA 

33 FORI = 180T0210:PUTSPRITE2, (XX, I):PUTSP 
RITE3,(XX+WV,I):NEXT:FORI=230T0180STEP-1 
:PUTSPRITE2, (XX, I),6,5:PUTSPRITE3, , , 0: NE 
XT:P=2 

34 LINE(0,0)-(72,8),15,BF:F0RI=1T03:PSET 
(8+I,0),1:COLOR4:PRINT#1,”BAZOOKA”:NEXT 

35 RETURN 

36 LINE(0,0>-(72,8),15,BF:FORI=1T03:PSET 
(8+1,0),1:COLQR4:PRINT#1,”® BONUS!":NEXT 

37 FORI=0TO255STEP2:SOUND9,15:SOUND2,I:S 
OUND4,255-1 :SOUNDIO,15:NEXT:SOUND9,0 :SOU 
ND10,0 

38 SC=SC+5000:PUTSPRITE3,,,0:PUTSPRITE2, 
,9,2: FORDITOIOOO: NEXT 

39 LINE(0,0)-(72,8),15,BF:F0RI=1T03:PSET 
(8+1,0),1:COLOR4:PRINT#1,”NORMALE”:NEXT: 
RETURN 

40 IFXX>=190THENXX=XX-64 

41 PUTSPRITE2,(XX,180),14,2:PUTSPRITE3,( 
XX+64,180),14,2:WW=64 

42 LINE(0,0)-(72,8),15,BF:F0RI=1T03:PSET 
(8+1,0), 1:COLOR4:PRINT#1,”DOPPIO” : NEXT: R 
ETURN 

43 LINE(0,0)-(72,8),15,BF:F0RI=1T03:PSET 
(8+1,0), 1:COLOR4:PRINT#1,”M.S.X. !” :NEXT 
: IFXX>198THENXX=XX~34 

44 SC=SC+2000:PUTSPRITE2,,,12:PUTSPRITE3 
, (XX+32, 180), , 12:V=l:VV=32 : FORI=0TO255 : S 
0UND2, I :S0UND3,255-I :SOUND9, 15 :NEXT:SOUN 
D9,0 :SOUND3,0 

45 RETURN 

46 PUTSPRITE3,,,0:PUTSPRITE2,,7,13:P=5:V 
= V*2 

47 LINE(0,0>-(72,8),15,BF:FORI=1T03:PSET 
(8+1,0),1:COLOR4:PRINT#1,"SCHIZZO”:NEXT: 
RETURN 

48 RETURN 

49 IFRND(l)<.7ANDY<18THENDX=-DX 

50 SOUND13,1:SOUND1,2+RND(1)*2 :IFPOINT(X 
+2,Y+6)<>1THENDY=-ABS(DY) 

51 IFC=8THENPY=24:SC=SC+50 

52 IFC=5THENFY=40:SC=SC+40 

53 IFC=2THENPY=56:SC=SC+30 

54 IFC=3THENPY=72:SC=SC+25 

55 IFC=10THENPY=88:SC=SC+20 

56 IFC=6THENPY=104 :SC=SC+10 

57 IFC=14THENRETURN 

58 IFC=-1THEN86 

59 IFC=15THENSOUNDO,0:SOUND13,4:DX=-DX:R 
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ETURN 

60 IFPOINT (W,PY)=1THENPX=V-1: G0T062 

61 V=W-1:GOT060 

62 0NFFG0T079 

63 IFRND(-TIME)<.7THEN79 

64 FORI = 155TOOSTEP-9 :SOUND2. I ;SOUND9, 15: 
SOUND10, 12:SOUND4,255-I :NEXT:SOUND9,0 : SO 
UND10,0 

65 PUTSPRITE5, (PX,PY+9); I = INT(RND(1 ) *7 + 1 
):0NIG0T066,68,70,72,74,76,77 

66 P0=1:PUTSPRITE5,,4,11 

67 GOTO 78 

68 P0=3:PUTSPRITE5, , 3,9 

69 GOTO 78 

70 P0=2:PUTSPRITE5,,6,10 

71 GOTO 78 

72 P0=4 :PUTSPRITES,,14,11 

73 GOTO 78 

74 P0=5:PUTSPRITE5,,7,13 

75 GOTO 78 

76 IFRND(1X. 7THEN66 ELSEP0=6 : PUTSPR ITE5 
, , 15,12 

77 P0=7:PUTSPRITE5,,4, 12 

78 FF=1 

79 LINE <PX,PY)-(PX+18, PY+8) , 1, BF:PA=FA+1 
:IFPA=PFTHENGOSUB105:G0T04 

80 RETURN 

81 ’###fire 

82 • 

83 IFP=2ANDF=0THENF=1: PUTSPR ITE4,(XX,160 
), 12,6:X0=XX: FORI =0TO255STEP16 :SOUND2, I : 
SOUND9,15:NEXT:SOUND9, 0 

84 IFF=9THENF=0:PUTSPRITE3,,, 0: X=XX+4:Y= 
182:IFP=3THENY=Y-8:DY=-4:DX=D 

85 RETURN 

86 P=0:P0=0:SPRITEOFF: PUTSPR ITEI, , ,0:SOU 
ND7,243:S0UND6,0:SOUND12,80: SOUND13 , 1: FO 
RI=OT015:PUTSPRITE2, ,1,7: PUTSPRITE3,,1,7 
*SGN(VV) : NEXT 

87 FORI=2T015: PUTSPRITE2, ,1,8:PUTSPRITE3 
, , I , 8*SGN(W) : NEXT 

88 COLOR4:PL=PL- 1:L I NE(224, 0 ) -(255,7 ) , 1, 
BF:PSET(232, 0) , 1: IFPL> OTHENFORI = 1TOPL:PR 
INT#1, ” • ” ; : NEXT 

89 LINE(0, 0)-(72,8) ,15,BF:F0RI=1T03:PSET 
(841, 0) ,1:COLOR4:PRINT#1, ”CRASH ! M :NEXT 

90 BEEP:PLAY”V15L09N50N0N50N0N50”:PSET ( 1 
04,152),1:PRINT#1, SC; ”PUNTI”:FORI=1T0200 
0:NEXT:LI NE ( 104, 151 >- (216, 161>, 1,BF: 

91 LINE (0,0)-(72,8), 15,BF:F0RI=1T03:PSET 
(8+1,0),1:COLOR4 : PRINT#1,”NORMALE”:NEXT 

92 IFPL=0THEN97 

93 XX=100:DX=-2: D=l:DY=-2: PUTSPRITE2,(10 
0,180),9,2:PUTSPRITE3,(XX+4,176),4,1:VV= 
4:F=9:X1 = BASE(13)+9 ;X2 = BASE ( 13)+13 :Y4 = BA 
SE(13)+ 16:Y5 = BASE ( 13 ) +20 :F=9:V=2:VV=0 

94 SOUNDO,200:SOUND8,16:SOUND12,20 

95 FORI = 1TQ500:NEXT:SPRITEON: RETURN5 

96 ’####################### #### GA 

ME OVER ##### ################## 

##### 

97 BEEP: LINE(0,0)- (72,8),15,BF:F0RI=1T03 


:PSET(3+1,0),15:C0L0R9:PRINT#1,SC:NEXT: F 
OR I = 1T02:PSET(88+1,8), 14:COLORI:PRINT#1, 
”GAME OVER”:NEXT:C0LQR15 

98 PLAY”T100V15L8R04ECD03GRG04DEC” 

99 LINE(0, 160)- (255, 170), 1,BF:PSET(9, 161 

) , 1:COLOR2:PRINT#1,” (C) 1987 BY MAURO M 

ARINILLI.” 

100 IFSTRIG(1)ORSTRIG(0)THENRUN2 

101 COLOR,,RND(1)*15 

102 GOTOIOO 

103 GOT0103 


104 RUN2 

105 CLS:LV=LV+1:LINE(0,8)-(255,16), 14,BF 
: LINE(0,8)-(4, 192), 14,BF:LINE(248,8)-(25 
5, 192) , 14, BF 

106 PSET(80,0), 1 : COLOR12 :PRINT#1,”LIVELL 
O:”; :C0L0R15:PRINT#1,LV:PSET(176,0),1:CO 
LOR7:PRINT#1,”PALLE:”; :COLOR4:PRINT#1,”• 


107 LINE ( 0,0)-(72,8),15,BF:FORI=1T03:PSE 
TC8+I,0),1:COLOR4:PRINT#1,”NORMALE”:NEXT 

108 ONLVGOTOl1 0 ,118,126,118,126,110,126, 
118,110,126,118,126,110,118,126,126,132 

109 PSET(144,0),1:C0L0R15:PRINT#1,LV 

110 E=8:El=24:FORI=lTO10:LINE(E,E1)-(E+1 
6,El+8),8,BF:E=E+24:NEXT 

111 E=8: E1 = 4 0 :FORI = 1T010:LINE(E,E1)-(E+1 
6,El+8),5,BF:E=E+24:NEXT 

112 E=8:El=56:FORI=1T010:LINE(E,El)-(E+l 
6, El+8) , 2, BF:E=E+24:NEXT 

113 E=8: E1 = 7 2 :FORI = 1T010:LINE(E,E1)-(E+1 
6,El+8),3,BF:E=E+24:NEXT 

114 E=8: E1 = 88 :FORI = 1T010:LI NE(E,E1)-<E+1 
6,El+8),10,BF:E=E+24:NEXT 

115 E=8: E1=104:FORI = 1T010:LINE(E,El)-(E+ 
16,El+8),6,BF:E=E+24:NEXT 

116 PF=60:’PRIMO QUADRO 

117 RETURN 


118 E=8:El=24 :FORI = 1T010:LINE(E,El)-(E+l 
6,El+8),8,BF:E=E+24:NEXT 


119 E=8: E1= 4 0 :FORI = 1T010:LINE(E,El)-(E+l 
6,El+8),5,BF:E=E+24:NEXT 

120 E=8:El=56:FORI=1T010:LINE(E,E1)-(E+1 
6,El+8),2,BF:E=E+24:NEXT 

121 E=8:El=72: FORI = 1T010:LINE(E,E1)-(E+1 
6,El+8),3,BF:E=E+24:NEXT 


122 LINE(16,88)-(232,96), 15,BF:LINE(112, 
88)- (144,96), 1,BF 

123 E=8:El = 104:FORI = 1T010:LI NE(E,El)-(E+ 
16,El+8),6,BF:E=E+24:NEXT 


124 PF=50:’SECONDO QUADRO 

125 RETURN 

126 PSET(8,32),1:C0L0R15:PRINT#1,” 


:PSET(8,72),1:PR 


INT#1, 


• ; : COLOR3 : PRINT#1, ” ■ H 
■I ■ ” ; : C0L0R15 : PR I NT#1, ” 

127 LINE(8,40)-(23,72),15,BF:LINE(56,40) 
- (71,72), 15,BF:LINE(176,40)-(191,72), 15, 
BF:LINE(224,40)-(239,72),15,BF 

128 C0L0R5:PSET(32,40),1:PRINT#1,” V : PS 

ET(200,40), 1:PRINT#1, "WM' :C0L0R2:PSET(32 
, 56) , 1: PRINT#1, ”■ ■■ WM' 
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129 E=8: E 1 = 88: FORI = 1T010: LINE (E, ED-CE+l 
6, El+8 ), 10,BF:E=E+24:NEXT 

130 E=8:El=104 :FORI=1T010:LINE(E,E1)-(E+ 
16,El+8),6,BF:E=E+24:NEXT 

131 PF=30: * TERZO QUADRO 

132 SCREEN1:PRINT"SONO ESAUSTO !": END 

133 RETURN 

134 SPRITES (1)=CHR$ (24 ) +** < <” +CHRS (24) 

135 SCREEN3:CLS:OPEN”GRP:"AS#1:PSET(52,7 
) : COLOR 15: FRI NT# 1, ?! P INGO” : PSET (52 ,'60')TC 
OLOR 14:PRINT#1,"PONGO": COLOR 4:PSET(32, 
130) : PRINT#1, M SQUASH” 

136 CLOSE#l 

137 F0RE=2T013:F0RI=1T08:READU:S$=SS+CHR 
S(U):NEXT:S$=S$+STRINGS(8, 0):F0RI = 1T08: R 
EADU:SS=SS+CHRS(U):NEXT: SS=SS+STRINGS(8, 
0) :SPRITES(E)=S$:S$= MM :NEXT 

138 RETURN 

139 DATA56,95,255,251,223,255,89,48, 28, 

250,255,223,251,255,154,12 

14 0 DATA56,95,255,251,223,255,88,48, 0,2 


55,191,255,251,255,3,0 

141 DATAO,255,253,255,223,255,192,0, 28, 

250.255.223.251.255.26.12 

142 DATAI,3,103,255,191,251,126,48, 128, 

192.230.255.253.223.126.12 

143 DATAI,3,7,7,3,1,8,2, 128,192,224,224 

,192,128,16,64 

144 DATA6,28, 126,255,254,255, 123, 193, 64 
,243,125,126,255,127,243,192 

145 DATAO,152,48,2,144,68,32,1, 0,64,6,3 

2,100,66,8,48 

146 DATA63,124,248,185,185,248,120,63, 2 

52.30.63.253.253.63.30.252 

147 DATA63,120,249,185,184,249,120,63, 2 

52.62.223.29.125.159.30.252 

148 DATA63,121,249,185,185,248,120,63, 2 

52.254.255.253.253.63.30.252 

149 DATA63,90,194,219,219,218,127,63, 25 

2.42.235.119.171.43.254.252 

150 DATA63,68,221,220,221,196,127,63, 25 

2.90.67.219.91.91.254.252 



Questo gioco condensa in un picco¬ 
lo listato delle prestazioni notevoli: 
ben nove livelli di gioco ed un va¬ 
sto assortimento di sprite e nuovi 
caratteri grafici 


Sistemi 

MSX 


di MAURO MARINIUI 



orrei proporvi in questo articolo un classico delle sa¬ 
le giochi e credo che molti di voi, leggendo il titolo, 
abbiano subito pensato al famoso serpentello scal¬ 
pitante che più mangiava e più si allungava, che ha 
fatto epoca nelle sale di tutto il mondo. 

Se ne avete già una versione, magari in linguaggio macchina, non 
sorvolate scocciati queste pagine, perché questo gioco non è così 
scontato come immaginate... 

Il protagonista è sempre lui, l’immaginifico verme. 

Lo vedremo scorrazzare in lungo e in largo per i nove livelli memo¬ 
rizzati, anche se dubito riusciate a guidarlo fino all’ultima, difficilis¬ 
sima prova: gli oggetti da raccogliere in questi quadri sono dei frutti 
e, con una speciale tecnica di ridefinizione livello per livello, ogni 
round i frutti cambieranno. Avremo cosi nell’ordine: LIMONI, MELE, 


CILIEGE, PESCHE, BANANE, UVA, PERE, FRAGOLE e (dulcis in fon¬ 
do...) il mio simbolo! 

Tutte queste forme vengono applicate sopra lo stesso carattere, il 
CHR$(224), ovvero CODE+ 6. Questa operazione viene eseguita 
alla linea 45. 

Se volete aggiungere nuove forme sappiate che i DATA che le con¬ 
tengono sono alla linea 109 e seguenti. 

Come noterete, oltre quella linea non ci sono più DATA: questo pro¬ 
prio per facilitare il vostro compito di “impiccioni”. 

Sono convinto che questo programma vi sarà molto d’aiuto per 
quel che riguarda la grafica applicata ai caratteri: un sistema come 
l’MSX che gestisce ben 32 sprite e possiede uno schermo grafico da 
16 colori è molto più sfruttato dal punto di vista grafico di quanto 
non lo sia lo schermo 1. 

Sono poche le riviste che hanno proposto delle applicazioni verso 
questo senso: questo programma supporta un’intero set di caratte¬ 
ri alfanumerici completamente ridefinito. Non esitate a prendere la 
palla al balzo e ad impiegarlo nelle vostre applicazioni. Chiuderò 
un occhio e non vi farò pagare le royalty! 

Se comunque siete interessati a nuovi set grafici per MSX, sarà suf¬ 
ficiente farlo presente alla redazione, e chissà se inaugureremo 
una serie di articoli proprio sui vari stili di carattere ... 

Come dicevo questo programma estende il set di caratteri, al con¬ 
trario della maggior parte degli altri programmi. 

Comunque non pensiate che non abbia utilizzato anche gli sprite: 
non me lo sarei mai perdonato! 



118 


LIST 5/89 




























PROGRAMMI 


Ecco quindi spuntare la novità sostanziale di questo NIBBLER ca¬ 
sereccio: I PONTI. 

I ponti, uno di solito li attraversa passandoci sopra, mentre in que¬ 
sto gioco voi (cioè il vostro serpentello) ci passerete sotto! 

Allora, dirà qualcuno, che difficoltà c’è? 

La difficoltà c’è, non vi preoccupate, perché di ponti ne esistono 
due tipi: quello "trasparente" ma non troppo, in cui è possibile ve¬ 
dere quello che si cela sotto e un altro tipo, quello “pieno”, dove bi¬ 
sogna andare alla cieca, non sapendo cosa ci sia nascosto. Così 
sotto un determinato ponte ci può essere un frutto o magari un te¬ 
schio o, ancora, un segmento velenoso simile al vostro corpo. 
Quindi per superare questo ostacolo entra in scena una capacità 
ben precisa: nel caso dei ponti trasparenti ci vuole dimestichezza 
col joystick, per raccogliere un frutto e schivare un’ostacolo molto 
vicino; per i ponti coperti, invece, basta una buona dose di memo¬ 
ria, per ricordare quello che c’è sotto ogni ponte. 


COMMENTO Al tISTATO 

0 - 1 : 

ridefinizione dello schermo 
2 - 6 : 

presentazione iniziale (stampa del titolo, ecc 
7-13: 

vpoke vari colori (siano in screen 1), definizione variabili 
14-25: 

RUN TIME o MAIN LOOP o CUORE DEL PROGRAMMA o quello che 
vi pare ! 


26-30: 

il serpente rimbalza sui muri 
31-33: 

muore una biscia 
34-36: 

GAME OVER (questa è in realtà la parte migliore del game) 
37-41: 

fine quadro, attribuisce il bonus, e mostra addirittura il REPLAY AC¬ 
CELERATO della vostra strategia in quel determinato livello; stè co¬ 
se non le fa nemmeno l’Amiga. 

42-47: 

stampa le scritte di rito sullo schermo (punti, livello ecc e invia ai va¬ 
ri livelli (nove livelli!) 


48-89: 

tutti i livelli, minuto per minuto... 

90-92: 

schermo d’inizio, una buona presentazione fa sempre bene. 
93-100: 

DATA dei caratteri (aguzzate lo sguardo gente, vi faranno como¬ 
do!) 


0 1 ### SERPENTONE ### 

1 KEYOFF:SCREEN1,2 

2 CLS:LOCATEO,2 :PRINT”■ 
■■ H^’:PRINT”1 
”:PRINT”B ■ B I 


■ a* :PRI NT 
" : PRINT” 


3 PRINT’ 


NT: PRINT” 
RI NT” Hi B 


B*: PRINT 
r:PRINT:PRI 

B W:P 

PRI NT” MB* 


”:PRINT” 


4 PRINT” 

hm m 


”:PRINT 


: PRINT’ 


5 LOCATE4,20:PRINT”scritto in basic d 
a i ” : LOCATE7,22: PRI NT” inauro mar ini Ili” 

6 GOSUBIOI:NESTORE 

7 COLOR .12»1»1:KEYOFF:VPOKE8217,15:VPOKE 
8210,14 :VPOKB8220,3:VPOKE8200,112:VPOKE8 
201,112:VPOKE8202,112:VPOKE8203,112:VPOK 
E8198,80:VP0KB8199,80 

8 0NKEYG0SUB89: KEYCDON 

9 GOSUB90:GOSUBIOI 

10 LV=0:GOSUB42:M=6511:N=M:DIMNC1002):J= 
1 

11 V=8: SE=8: MM=-32 

12 VT=6:T1=1000:G0T031 

13 SOUNDO,0:SOUND8,16:SOUND11,10:SOUND12 
,10 

14 VPOKEM, P 

15 JO=STICK(J) :LOCATE20,0:PRINTTI-V 

16 IFJO=lANDMM< >32ANDVPEEK(M+MM) <>219THE 
NMM=-32:P=202 

17 IFJ0=3 ANDIQC< > -1 ANDVPEEK (X+MM) < >219THE 
NMM=+1 :P=200 

18 IFJ 0=5ANDMM< > -32ANDVPEEK <M+MM) < > 219TH 
ENMM=32 :P=203 


19 IFJQ=7ANDMMC>1ANDVPEEK(M+MM)0219THEN 
MM=-1 :P=201 

20 IFV>TITHEN31 

21 VPOKEN < V-SE),32: IFVPEEK(M)=32THEN14 

22 IFVPEEK(M+MM)O219THENVP0KEM,144:M=M+ 
MM: N(V)=M: V=V+1:ELSEIFVPEEK(M+MM)=219THE 
NGOSUB26:VPOKEM,144:M=M+MM: N(V)=M:V=V+1 

23 IFVPEEK(M)=224THENSE=SE+1:SC=SC+10:PU 
=PU+1:L0CATE6,0:PRINTSC: SOUND1,2 : SOUND13 
,2:IFPU=40THEN38 

24 IFVPEEK(M)=1440RVPEEK(M)=87THEN31 

25 G0T014 

26 SOUND1,255:SOUND13,1 

27 IFMM=32 THBNMM=1:P=200 : RETURN 

28 IFMM=-32THENMM=-1:P=201: RETURN 

29 IFMM=lTHENMM=-32:P=202:RETURN 

30 IFMM=-1THENMM=32: P=203: RETURN 

31 FORI=6880+20T06880+18+VT:VPOKEI,200:N 
EXT:VPOKE1,32 

32 PLAY”V15O3S0M9000L19C-C+CD-D+D”:VT=VT 
-1:IFVT<1THBN34 

33 FORI=(V-SE)TOV:VPOKEN(I),32 :NEXT:FORE 
= 1T0500:NEXT: M=6511:N=M:P=202:MM=-32:GOT 


013 


34 LOCATEIO,8:PRINT”GAME OVER”:VPOKE6880 
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101-104: 

routine di lettura 
105-112: 

altri DATA. Il mondo è pieno di DATA... 


Ora, come al solito un po’ di variabili, che non fanno mai male. 


LV è il livello in corso. 

M rappresenta il contenuto della locazione video dove si trova la te¬ 
sta del serpentone: attenzione a non mordervi da soli! 

N, invece, rappresenta la locazione video della coda della serpe. 
N(1000) rappresentano tutti i vari segmenti del nostro eroe, più 
mangiate e più vi allungate. 

MM è la direzione in cui si muove il serpente. 

VT sono le vite. Questa variabile va aumentata di 1: ad esempio se 
vogliamo una partita con 5 vite in dotazione, bisogna porre VT 
uguale a 6. Questo perché il gioco, all’inizio della partita, elimina 
automaticamente una vita, ma non crediate sia un bug: è soltanto 
una tecnica di programmazione per abbreviare il listato e accorcia¬ 
re il vostro lavoro. 

Queste erano le variabili più importanti. Naturalmente tralascio lo 
SCORE (SC), visto che ormai dovreste saperlo da soli. 

Ora facciamo insieme un po’ di considerazioni su questo program¬ 
mino, lo so che state scalpitando dalla voglia di andarlo a digitare, 
ma vi consiglio di continuare a seguire l’articolo: vi farà bene, è ga¬ 
rantito. 

Il listato è lungo in totale (escluse le REM) poco più di 110 righe: ve¬ 
ramente poco. 

Come è possibile condensare un videogioco del genere, farne nove 
livelli, addirittura ridefinire tutti i caratteri maiuscoli, numeri, sprite e 
i 9 oggetti da raccogliere (non dimentichiamo il carattere (C) 
CHR$(204) ed il teschio)? 

Certo qualcuno di voi noterà la semplicità del soggetto, ma notia¬ 
mo anche la velocità: per essere scritto totalmente in BASIC è un 
gioco molto veloce. 

Consideriamo che più si va avanti e più si "scioglie" in rapidità, e 
vedremo che non è stato semplice idearlo. Qualcuno osserverà: ma 
questo discorso a cosa ci porta? 

Presto detto: io scrivo per voi, potrei anche mollarvi un listato di me- 
ga-adventure colossale, certamente bello, ma il gioco vale la can¬ 
dela? 0 invece preferite un listato come questo, non molto lungo 
ma espandibile per conto vostro, “digeribile” anche dal punto di vi¬ 
sta didattico? lo continuo per la seconda strada, non escludendo 
per i prossimi numeri qualcosa di “massiccio”. 

Se poi ci farete sapere qualcosa, noi non potremo che prenderne 
atto. 

Vorrei lasciarvi una data prima di salutarvi: volete sapere quando 
ha visto la luce questo programma ? Nell’agosto del 1986, dopo tre 
mesi scarsi dall’acquisto del mio (allora) fiammante MSX. Lo avevo 
accantonato perché lo ritenevo un genere troppo sfruttato. 

La morale: non sempre le novità e le primizie sono superiori alle co¬ 
se “passate”, in questa era elettronica che ci spinge sempre di più 
al “compra-vendita-ricompra-butta”. 

Non dimentichiamocelo. 


+20,32 

35 IFSTRIG(J)THENRUN7 

36 VPOKE8210,14*RND(1):G0T035 

37 REM fine quadro 

38 VPOKEM,P:FORI=TI-VTOTISTEP10:SC=SC+1; 
LOCATE6,O:PRINTSC:LOCATE20.O:PRINTTI-I : B 
EEP 

39 NEXT 

40 F0RI=VT08STEP-1:VPOKEN(I),144:VPOKEN( 
1+8),32:NEXT:FORI = OTOV:N(I)=0 :NEXT 

41 SC=SC+100:G0SUB42:V=8+ <LV*2>:SE=8+LV: 
PU=0:M=6511: G0T013 

42 LOCATEO,1:PRINTSTRINGS(28,219):FORI=l 
TO20: PRINT’’!’TAB(27)*’!’ : NEXT: TI=1000- (LV 
*100): IFLV>6THENT1 = 400 

43 FORI=6146+(32*22)T06144+29+(32*22) : VP 
OKE1,219:NEXT 

44 LV=LV+1:LOCATEO, 0: PR I NT” SCORE : ” ; TAB (1 
6)”L:” LV 

45 FORI=0TO7:READU:VPOKE1792+I,255-U:NEX 
T: IFLV> 9THENREST0RE109 

46 F0RI=1T08:PUTSPRITEI,(0,0),0:NEXT 

47 ON LV G0T048,53,61,64,69,75,81,85,900 
, 950 

48 L0CATE2,4:PRINT”a a a”;TAB(20)"a a a” 

:LOCATE2,6:PRINT”a a a”;TAB(20)"a a a” 

49 LOCATE2,18:PRINT"a a a" ; TAB (20 )’’a a a 
”:LOCATE2.20: PRINT"a a a "TAB(20)"a a a 

it 

50 LOCATE2,10:PRINT"a a"TAB(22)"a a":LOC 
ATE2,12:PRINT"a a"TAB(22)"a a" 

51 LOCATE10,10:PRINT"a a a a":LOCATEIO,1 
2 :PRINT"a a a a 

52 RETURN 

53 L0CATE6,3: PRINT"! ■ ■§ !’:FOR 

I = 1T02: LOCATE6: PRI NT’’!’TAB (21)’’!* : NEXT: L 
0CATE2: PRINT"| ■ Hi HM ■ !’ 

54 F0RI = 1T03:LOCATE9:PRINT"!’TAB(18)"!’ : 
NEXT:LOCATE6,9 :PRINT" !’ :LOCATE21,9 : PRINT 
’’!' : FOR 1 = 1 T05 : L0CATE6: PRINT"!’TAB (21 ) "!’ 

: NEXT 

55 LOCATE9, 14:PRINT"!’ :LOCATE18, 14:FRINT 
’’!’ : F0RI = 1T02 : L0CATE9 : PRINT"!’TAB (18) "!’ 

: NEXT : LOCATE2 : PR I NT" | ! WKM I 

f 

56 F0RI = 1T02:L0CATE6:PRINT"!’TAB(21)"!’ : 
NEXT:LOCATE6,20:PRINT"! WÈ WM !’ 

57 LOCATE4,4 ;PRINT"aa";LOCATE4,5 :PRINT"a 
a":LOCATE22,4 :PRINT"aa":L0CATE22,5 : PRINT 
"aa":LOCATE4,18:PRINT"aa":LOCATE4,19:PRI 
NT’’aa" 

58 LOCATE22,18:PRINT"aa":LOCATE22,19; PRI 
NT"aa": LOCATE11,2:PRINT"aaaaaa": LOCATE11 
,19 :PRINT"aaaaaa" 

59 LOCATEIO,16:PRINT"aaa aaa":LOCATEIO, 
7 :PRINT"aaa aaa" 

60 RETURN 

61 LOCATE,4:FORI=1T02:LOCATE1; PRINT"aaa 
éé"TAB <21 ) ’’éé aaa" : NEXT: FORI=9T014 : LOCA 

TE5,I:PRINT"a"TAB(22)"a":NEXT 

62 LOCATE, 18:FOR1 = 1T02: LOCATE1:PRINT"aaa 
éé"TAB(21)’’ èé aaa" ; NEXT: LOCATE14,4: PRIN 

T"aa":LOCATE14,19:PRINT"aa" 

63 RETURN 
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64 FORI =3T09 : LOCATE I, I -*-2 : PRINT" a" : NEXT : F 
ORI=24T018STBP-1: LOCATE1,29-I :PRINT"a":N 
EXT:FORI=9T03STEP-1: LOCATE1,23-1 : PRINT"a 
":NEXT 

65 FORI = 18T024: LOCATEI, 1-4: PRINT"a" : NEXT 
:FORI=2T06STEP2:LOCATB13,I:PRINT"a":NEXT 

66 LOCATE11,17:PRINT"aaaaa" :F0RI=15T019: 
LOCATE13, I : PRINT"a":NEXT 

67 PUTSPRITEI,(116,20),13,2:PUTSPRITE2, < 
28,84),12,2:PUTSPRITE3,(212,84),11,2:PUT 
SPRITE4,(116,132),4,2 

68 RETURN 

69 LOCATE13,2:PRINT"Éé":LOCATE13,21:PRIN 
T"éé": LOCATE,9:FORI=1T02:LOCATE1:PRINT"é 
"TAB(26)"é":NEXT 

7 0 LOCATE,4 : FORI = 1T02:L0CATE2:PRINT"aa 
aa aa aa ":PRINT:NEXT 

71 LOCATE,16:FORI=1T02:L0CATE2:PRINT"a a 

a a a a a a":PRINT:NEXT: LOCATE 

12,17:PRINT"a a" 

72 LOCATE3,9 :PRINT"aa"TAB(23)"aa": LOCATE 
3:PRINT"a"TAB(24)"a" 

73 PUTSPRITEI,(116,84),6,1:PUTSPRITE2,(3 
6,76),8,1:PUTSPRITE3, (204,76),9,1 

74 RETURN 

75 LOCATE1,2 :PRINT"V a a a 

a V":LOCATE4:PRINT"a a"TAB(21)"a a": LO 

CATE1,5:PRINT"a"TAB(26)"a":LOCATE2:PRINT 
"a" TAB (25) "a" 

76 LOCATE1:PRINT"a"TAB(26)"a":LOCATE2:PR 
INT"a"TAB(25)"a":LOCATB1,15: PRINT"a"TAB( 
26)"a":LOCATE2:PRINT"a"TAB(25)"a" 

77 LOCATE1:PRINT"a"TAB(26)"a" : LOCATE2 : PR 
INT"a"TAB(25)"a" : LOCATE11, 16:PRINT"VaaaV 
":LOCATEl,21:PRINT"W a a"TAB(21)"a a V 
":LOCATE5,20:PRINT"a a"TAB(20)"a a" 

78 F0RI = 14T019:LOCATE13, I :PRINT"a":NEXT 

79 PUTSPRITEI,(116,116),5,1:PUTSPRITE2,( 
116,132),5,1:PUTSPRITE3,(100,124),7,1:PU 
TSPRITE4,(132,124),7,1 

80 RETURN 

81 A$="l a aa a a aa a" : LOCATE 
,5:PRINTAS: LOCATE,9 :PRINTA$: LOCATE,15:PR 
INTAS: LOCATE,2 0:PRINTAS 

82 AS="1 V V V V V": LOCATE, 
4:PRINTAS:LOCATE,7:PRINTAS: LOCATE,10:PRI 
NTAS:LOCATE,13:PRINTAS: LOCATE,16:PRINTAS 
: LOCATE,19:PRINTAS 

83 LOCATE8,10:AS="aVa aVa":PRINTAS: 

LOCATE8,13:PRINTAS:AS="" 

84 RETURN 

85 FORI=2T021:LOCATE8, I : PRINT" »’ :NEXT: LO 
CATE,3:F0RI = 1T09: LOCATE3: PRINT"a a": LOCA 
TE4:PRINT"a":NEXT 

86 LOCATE6,13: PRINT"V V":F0RI = 15T021:L 
OCATE21, I:PRINT"»’ :NEXT:LOCATE21,14:PRIN 
T"»H WM' : LOCATE22, 12: PRINT" VWVa" : LOCA 
TE25,2:PRINT"Va" 

87 LOCATE24, 15 :PRINT"a":LOCATE22:PRINT"a 
a":LOCATE24:PRINT"a a" : LOCATE22: PRINT"a 
a":LOCATE24:PRINT"a a":LOCATE22:PRINT"a 
a" 

88 RETURN 


89 RUN7 

90 CLS:LOCATE6,4:PRINT"S ERPENTON 
E":LOCATE5,15:PRINT"^ 1986 BY MAUERSOF 

T":LOCATE9,17:PRINT"MAURO KARINILLI." 

91 FORI=OT031:PUTSPRITEI,(0,-30),0,0:NEX 
T 

92 RETURN 

93 DATAO, 124,126,114,126,114,114,114 ,0, 

124.78.124.112.124.78.124, 0,30,124,96,9 
6,96,96,62, 0,124,126,118,114,114,122,12 
6 

94 DATAO,62,126,96,120,96,96,126, 0,60,1 
26,98,112,120,96,96, 0,62,126,64,96,102, 

110.124, 0,98,98,110,126,98,98,98 

95 DATAO,48,48,24,24,24,24,24, 0,126,120 
,24,24,24,88,112, 0,102,108,120,96,120,1 

10.102, 0,96,96,96,96,96,124,126 

96 DATA66,102,126,86,70,70,70,70, 0,98,9 
8,114,122,110,102,98, 0,60,126,102,102,1 
02,126,60, 0,60,126,102,110,124,96,96 

97 DATAO,60,126,102,102,110,124,46, 0,12 

4.110.102.126.120.108.102, 0,62,126,96,1 

20.14.70.124, 0,126,126,24,24,24,24,24 

98 DATAO,98,98,98,98,98,126,124, 0,98,9 

8,98,98,54,28,8, 126,153,219,255,118,44 

,52,44, 0,102,118,60,24,60,110,102, 0,10 

2.102.60.24.24.24.24, 0,126,126,12,24,48 
,110,252 

99 DATA127,67,97,97,97,97,97,127, 6,14,1 
4,6,6,6,6,6, 127,99,2,6,12,24,120,127, 1 
27,99,3,31,27,3,99,127, 99,99,103,127,62 
,6,6,6, 127,67,64,126,7,3,99,127 

100 DATA127,99,96,96,126,111,99,127, 127 

,99,3,7,6,14,12,12, 127,103,99,60,60,103 
,99,127, 127,118,70,127,6,6,6,6 

101 F0RI=65*8T091*8-1:READU:VPOKEI,U:NEX 
T:F0RI=48*8T058*8-1:READU:VPOKEI,U:NEXT 

102 FORI = l152T01159:READU:VPOKEI,255-U:N 
EXT:FORI=1600T01599+(5*8):READU:VPOKEI,2 
55-U:NEXT: 

103 FORE=1T02:FOR1=1T032:READU:SS=SS+CHR 
S(U):NEXT:SPRITES(E)=SS:SS="":NEXT 

104 RETURN 

105 DATA126,255,255,255,255,255,255,126, 
0,126,251,255,223,224,254,252,0,126,223, 
255,251,7,127,63 

106 DATA24,36,60,90,126,126,126,60,60,12 

6.126.126.90.60.36.24, 126,195,153,161,1 
61,153,195,126 

107 DATA128,64,32,31,31,31,31,31,31,31,3 
1,31,31,32,64,128,1,2,4,248,248,248,248, 

248.248.248.248.248.248.4.2.1 

108 DATA128,64,32,31,21,26,21,26,21,26,2 
1,26,31,32,64,128,1,2,4,248,88,168,88,16 

8.88.168.88.168.248.4.2.1 

109 DATA 8,60,110,94,94,94,110,60 

110 DATA12,16,126,223,223,239,126,60, 4, 
8,20,100,182,251,111,6 

111 DATA50,21,8,126,251,253,253,126, 12, 
30,27,59,51,118,230,204, 6,40,84,42,84,4 
0,16,32 

112 DATA13,18,57,56,124,254,186,108, 4,1 

04,222,186,238,124,40,16, 126,195,129,1 

65,189,165,165,102 à 


LIST 5/89 


159 


121 















I PROGRAMMI DI IIST 


PER RICHIESTE VEDI 
“SERVIZIO PROGRAMMI” 


COMMODORE 128 

UST N 

AUTO DATA 

4/1987 

TERROR TERRAIN 

11/1987 



MERIDIANA 

5/1987 

FROGGY GO HOME 

12/1987 

TECNO 

3/1987 

POLO NORD 

6-7/1987 

CHAR EDITOR 

12/1987 

EASY DATA 

5/1987 

TALKING SPECTRUM 

8-9/1987 

AUTOGRAPH 

1-2/1988 

AGENDA 128 

8-9/1987 

FAST LANDER 

10/198 

CHIMICA FACILE 

1-2/1988 

TUTTO DOS 

10/1987 

DEC HES 

10/1987 

MUSIC EDITOR 

3/1988 

GESTIONE MAGAZZINO 

11/1987 

HEARDLESS FILES 

11/1987 

SUPER DIRECTORY 

4/1988 

ELEMENTI DI CHIMICA 

12/1987 

DEC BIN CONVERTER 

11/1987 

RIDUZIONE SISTEMI 

4/1988 

CALCOLATRICE 

12/1987 

INVADERS 

12/1987 

GESTIONE MAGAZZINO 

5/1988 

CROSS OVER 

12/1987 

THE SCREENS 

1-2/1988 

PRETTY PRINTER 

5/1988 

ARCHIVIO FORNITORI 

3/1988 

METEOR STORM 

3-1988 

OTHELLO 

5/1988 

GEOMETRIA 

6/1988 

UDG 

4/1988 

RIUNISCI LA MUSICA 

6/1988 

EASY DISK 

10/1988 

SCR LOAD - SCR SAVE 

5/1988 

CACCIA ALLE LETTERE 

6/1988 

GIOCO DEL LOTTO 

10/1988 

STRUTTURA DELL'ATOMO 

6/1988 

DISASSEMBLER 

6/1988 

DISK UTILITY 

11/1988 



MENU 

7-8/1988 

THE BIG CHARS 

12/1988 

OLIVETTI PRODEST PC 128 

UST N 

DECOR EDITOR 

7-8/1988 





KEYWORD ESTENSION 

7-8/1988 

COMMODORE 84-128 

UST N 

QUARKSTYLE 

1/1987 

FUNZIONI 3D 

9/1988 



ALFABETO PAZZO 

2/1987 

CALENDARIO PERP 

9/1988 

ASTON 64 TITOLAT. 

3/1986 

SEMPLIFICAZIONE DI FRAZ. 

3/1987 

RAINBOW 

9/1988 

CATALOGO PROGRAMMI 

4/1986 

OTHELLO 

4/1987 

MERGE 

10/1988 

SUPERUTILITY 

5-6/1986 

MEMORY 

4/1987 

CATALOGO 

10/1988 

NOTE DIRECTORY 

9/1986 

IL VIAGGIOSCOPIO 

5/1987 

LUCKY WHEEL 

10/1988 

CALCOLO DEGLI INTERESSI 

3/1987 

BOMBER 

6-7/1987 

ANTIFURTO 

11/1988 

GHOSTS 

4/1987 

OLI 3D 

8-9/1987 

PRED PRINT 

11/1988 

BRISCOLA 

4/1987 

PIE CHART 

10/1987 

GESTIONE BIBLIOTECA 

11/1988 

SISTEMA SOLARE 

6-7/1987 

SQUIGGLE 

11/1987 

STARLANE 

12/1988 

AUTOSPRITE 

8-9/1987 

ASTEROIDI 

11/1987 

SETTE E MEZZO 

12/1988 

VIDEO CRONOMETRO 

8-9/1987 

RIDUZIONE DI SISTEMI 

1-2/1988 

POKER 

12/1988 

MULTITASK 64 

10/1987 

CARTON CREATOR 

1-2/1988 

LA STANGATA 

1-2/1989 

CRAYON 

10/1987 

THE MAZE 

1-2/1988 

MERGE 1.1 

1-2/1989 

PUZZLE 

10/1987 

SISTEMI LINEARI 

3/1988 

SCANNER 

1-2/1989 

JUMP 3D 

11/1987 

GRID 

3/1988 

PROMMER 

3/1989 

IL MUSICHIERE 

12/1987 

COME TI POKO IL VIDEO 

4/1988 

GESTIONE CONTO CORRENTE 

3/1989 

VIDEO CRUCIVERBA 

12/1987 

OLISTORE (DATA BASE) 

4/1988 

CRAMER 

4/1989 

EASY CHAR 

1-2/1988 

CARACTERS SETS 

5/1988 

DOMINO 

4/1989 

TOTOCALCIO FACILE 

1-2/1988 

GRID RUN 

5/1988 

ALFA-SEO 

4/1989 

TELE BEAM 

3/1988 

CHARACTER EDITOR 

6/1988 



IL DISEGNA CARTE 

MEMOREX 

4/1988 

SISTEMA SOLARE 

6/1988 

PC COMP. MS-DOS 

LIST N 

4/1988 

PIANOLA 

7-8/1988 



RISIKO 

4/1988 

MINILOGO 

7-8/1988 

MS-DOS CON IL BASIC 

1-2/1988 

ENCI OUIZ 

5/1988 

MONITOR 

9/1988 

TOTO 13 

4/1988 

TALK 64 

5/1988 

OLIEXPERT 

9/1988 

BIORITMO 

5/1988 

MEDICALC 

5/1988 

ELAB. DI SPRITE 

9/1988 

SUPERGRAPHIC 

5/1988 

AGENDA 

5/1988 

STUDIO DI FUNZIONE 

10/1989 

MASTER MINO 

6/1988 

HYPER SPACE 

6/1988 

COME SI SUONA LA CHITARRA 10/1988 

EQUAZIONE DI 2° GRADO 

6/1988 

GIOCO DEL 21 

6/1988 

BATTLE 

10/1988 

AGENDA TELEFONICA 

7-8/1988 

MICRO L/M 

7-8/1988 

CAE - DISEGNO ELETTRONICO 11/1988 

MUSICA CON IL PC 

7-8/1988 

TEST RIFLESSI 

9/1988 

SOLUZIONE DI POLINOMI 

11/1988 

STUDIO DI FUNZIONI 

9/1988 

TOTORIDUTTORE 

10/1988 

CRAZY PICTURE 

11/1988 

SETTE NOTE 

10/1988 

ADVENTURE HOME 

12/1988 

SOUND SAMPLER 

12/1988 

CALCIO CLASSIFICA 

11/1988 

CACCIA GROSSA 

12/1988 

PROPORTIONAL 

12/1988 

WORD PROCESSOR 

12/1988 

SINONIMI 

12/1988 

DATAGEN 

1-2/1989 

BATTAGLIA TRA LE MONTAGNE 

1-2/1989 

SCHERMA 

1-2/1989 

3LACK JACK 

1-2/1989 

TOTOCALCIO 

1-2/1989 

SFIDA 

1-2/1989 

COPY FILE 

1-2/1989 

RISOLUZIONE SISTEMI 

3/1989 

EASY WORD 

1-2/1988 

SCREEN EDITOR 

3/1989 

RUOTA DENTATA 

3/1989 

LOVE GAME 

1-2/1989 

TOTORIDUZIONE 

3/1989 

SIMPLEX 

3/1989 

CAN CAN 

3/1989 

SALTO IN LUNGO 

3/1989 

RAMDISK INSTALLER 

4/1989 

POKER 

3/1989 

SM 

4/1989 



AVVENTURA 

3/1989 

ESAB 

4/1989 



IL GIOCO DELLA MEMORIA 

4/1989 

NUOTO 

4/1989 



LE OTTO REGINE 

COPY 64 

4/1989 

4/1989 

BORDER 

4/1989 

PROGRAMMI SPECIALI 


SISTEMI SMX 

UST N 

OLIVETTI PRODEST PC 128S 

UST N 



WINDOW EDITOR 

2/1987 

MSX 2 

LIST N 

DATA WRITER 

1-2/1986 

SPHEROGRAPH 

3/1987 



C/C BANCARIO 

10/1986 

OLICALC 

4/1987 

EFFETTI SPECIALI 

1-2/1989 

IL TECNIGRAFO 

1/1987 

CONTABILITA DOMESTICA 

5/1987 

XBASIC KUN 

3/1989 

L'INVENTA SPRITE 

3/1987 

AIR COMBAT 3D 

6-7/1987 



ROTAZIONE 3D 

AUTOPROG. GRAFICO 

6-7/1987 

C/C BANCARIO 

6-7/1987 

OLIVETTI PRODEST PC 128 S 

LIST N 

10/1987 

AGENDA TELEFONICA 

8-9/1987 



JOHNSON CONTRO LEWIS 

1-2/1988 

AGENDA APPUNTAMENTI 

10/1987 

OVERLAY ROUTINE 

4/1989 

DOSSIER ASCII 

3/1988 





SPRITE DANCE 

3/1988 





ANIMARE COL VDP 

4/1988 





STAR WARS 

4/1988 











GIOCHIAMO CON GLI ANIMALI 

5/1988 





SUMMIT USA-URSS 

5/1988 





MICROCARATTERI 

STAR WARS 2 

VAMPYR 

6/1988 

6/1988 

7-8/1988 

SERVIZIO PROGRAMMI 


ANGOLI 

7-8/1988 





PIANETA CHIRONE 

7-8/1988 





DRAKULA 

FAST FOOD 

10/1988 

10/1988 

1 programmi pubblicati in questo numero e nei precedenti di LIST, 

BOMB MAN 

CARATTERI TIPO RASTER 

11/1988 

11/1988 

sono disponibili registrati su cassetta o floppy disk. 


UTILITY ICOME-MSX2 

CATCH 

11/1988 

12/1988 

1 lettori possono richiederli specificando il titolo e quale computer. 

TRIANGOLI 

COMPUTER RITRATTI 

ACQUARELLO 

12/1988 

12/1988 

1-2/1989 

Inviare, quale contributo spese, per ogni programma: 

Lire 10.000 su cassetta, Lire 12.000 su floppy disk da 5” 1/4 o 3,5 

9 

COPY SPRITE 

1-2/1989 





GHOST'N ZOMBIES 

OPTIX 

1-2/1989 

3/1989 

Per i 

programmi speciali il costo è di Lire 15.000 


ANIMAZIONE 3D 

3/1989 





GRAFICA 3D 

4/1989 


La richiesta deve essere fatta 


WORKSTATION COPY 

4/1989 


a mezzo vaglia postale indirizzato a: 


ZX SPECTRUM 

UST N 

rnirnMD Qrl \/ia Piavir» Qtilinnno 111 _ 0017^ ROMA 








'CAMP 1 

TOT 13 

1-2/1986 

3/1986 


(Ufficio postale Roma 80) 


DATA BASE 

IL TEST DELL'AMORE 

4/1986 

10/1986 

oppure con assegno bancario N.T. in busta chiusa. 


ROULETTE 

12/1986 





ECLISSI LUNA 

3/1987 

















i gioielli della robotica 


comuni 




V 1 *’ a» au ^ 


Dove acquistarli? 

I ROBOTS MOVIT ILLUSTRATI SONO REPERIBILI IN QUESTI NEGOZI 


AOSTA - Mastro Geppetto, Via Croce di Città 73 - (0165)362174 

AREZZO - Giocalibro, Via Mecenate 35 - (0575)356357 

BARI - Libreria deir Arca, Via dell’Arca 14 - (080)224212 

BARI - Pentalfa e Varianti, Piazza A. Moro 25/A - (000)369393 

BERGAMO - Bimbolegge Bimbogioca, Via Borfuro 12 B/C - (035)2130015 

BIELLA - Il talismano, Va Italia 45 • (015)22488 

BOLOGNA - Città del Sole, Strada Maggiore 17 - (051)266432 

BORGOSESIA - Erbavoglio, Via Roma 20 • (0163)25612 

BRESCIA - Barbanzè, Va Mazzini 24 - (030)57249 

BRESCIA ■ L'altro Barbanzè, Via Mazzini 20 • (030)57249 

BRINDISI - Città del Sole, Piazza Cairoti 36/37 - (0831)21146 

CATANIA - Cartolibreria dei Ragazzi, Vale Ionio 46 - (095)371725 

CATANIA - Coop Magia, Viale Ionio 46 - (095)371725 

CESENA - Libreria Bettìni, Via Vescovado 5 - (0547)21634 

CHIETI - Games Centre, Centro Commerciale il Gialdo - (011)9478877 

CUNEO - Centro Gioco Educativo, Via Carlo Emanuele 7 - (0171)65600 

FAENZA - Città del Sole, Voltane della Molinella - (0546)21013 

FERRARA - Città del Sole, Via Contrari 40 ■ (0532)48816 

f RENZE - Città del Sole, Borgo Ognissanti, 37 - (055)219345 


FOGGIA - Città del Sole, Via Valentini Vista 8 • (0881)21112 
IVREA - Didattica più, Via Guarnotta 33 - (0125)40105 
LECCE - Città del Sole, Via B. Croce 16 - (0832)57934 
MATERA - Città del Sole, Via la Croce 8 - (0835)219430 
MILANO - Città del Sole, Via Dante 13 - (02)806068 
MILANO -1 giochi dei grandi, Via Meravigli 7 - (02)8058991 
MODENA • Orsa Maggiore, Piazza Matteotti 20 • (059)211200 
MONZA - Città del Sole, Va Carlo Alberto 33 - (039)389885 
MORBEGNO - Città del Sole, Vicolo Colombo - (0342)613370 
NAPOLI - Città del Sole, Via Kerbaker 46 - (081)242764 
NOVARA - Dialoghi giochi, Corso Cavallotti 21 • (0161)57789 
ORISTANO - Didagiò, Vicolo Solferino 6 - (0783)73169 
PADOVA - Va S. Martino e Solferino 102 • (049)875315 
PALERMO - Città del Sole, Via Libertà 43 - (091)298799 
PAVIA - La cicogna, Va Omodeo 29/33 - (0382)25705 
PESCARA - Città del Sole, Viale Regina Margherita 30 - (085)295356 
PINEROLO - Centro Gioco Educativo, Via Lequio 58 - (0121)74084 
PORTOFERRAIO - 0-99 Giochi, Va Manganare 52 - (0565)917906 
REGGIO EMILIA - Città bel Sole, Via Franzoni 6/B 


ROMA - Città del Sole, Va della Scrofa 65 - (06)6875404 
S. BENEDETTO DEL TRONTO - Città del sole, Via Palestre 25 - (0735)2738 
SASSARI - Città del Sole, Via Usai 29/31 - (079)231095 
SAVIGLIANO - Centro Gioco Educativo, Via Mazzini 21/23 - (0172)33434 
SIENA - La nuova fabbrica dei sogni, Via Pantaneto 38 - (0577)285591 
TARANTO - Città del Sole, Via Nitti 57 - (099)24436 
TORINO - Centro Giochi Educativo, Va Cemaia 25 - (011)541776 
TORINO - Centro Giochi Educativo, Va Nizza 97 - (011)6698478 
TORINO - Centro Giochi Educativo, Corso Peschiera 160 • (011)389134 
TORINO - Games Centre, Centro Commerciale Lagrange 15 - (011)512576 
UDINE - Città del Sole, Piazza San Cristoforo 14 - (0432)208148 
VARESE - Città del Sole, Via Avegno 15 - (0332)234271 
VEN.MESTRE - Città del Sole, Via Palazzo 50 • (041)5053015 
VERCELLI - Dialoghi Giochi, Via G. Ferraris 53 • (0161)57789 
VERONA - Città del Sole, Va Cattaneo 8 - (045)591761 

Prodotti in Giappone 
distribuiti in Italia da: 

Texim Italia s.r.l. - Via Flavio Stilicone, 111 
00175 - Roma - Tel. 7665495 






Ivan Garzanti 



SOLO “BUONA”MUSICA! 


SAVONA 

VENEZIA 

VICENZA 

PADOVA 

BELLUNO 

VERONA 

UDINE 

GORIZIA 

PORDENONE 

BOLOGNA 

MODENA 

REGGIO EMILIA 

FERRARA 

FORLI 

PARMA 

PIACENZA 

RAVENNA 


Area ascolto: 


RIMINI 

Città e prov. 

frequenze 

FIRENZE 

MILANO 

101-101.200-98.700 

AREZZO 

BERGAMO 

101-101.200 

GROSSETO 

BRESCIA 

88.300-88.900 

LIVORNO 

COMO 

101-101.200 

LUCCA 

CREMONA 

101.200 

MASSA CARRARA 

MANTOVA 

88.300-101.200 

PISA 

PAVIA 

101-101.200 

PISTOIA 

SONDRIO 

100.500 

SIENA 

VARESE 

101-95.100 

RIETI 

TORINO 

91.100 

ROMA 

BIELLA-IVREA 

104.700 

VITERBO 

ALESSANDRIA 

101-101.200 

ANCONA 

NOVARA 

101-101.200 

PESARO-URBINO 

VERCELLI 

101-101.200 

TERAMO 

GENOVA 

107.100(-l 05.250 

PESCARA 

IMPERIA 

107.100 

CHIETI 

SANREMO 

101.250-107.400 

PERUGIA 

VENTIMIGLIA 

101.250 

TERNI 

LA SPEZIA 

107.100-106 

SPOLETO 


107.100-105.250 

106.900 

106.900 

106.900- 96. 70( 

106.900- 1 07 . \ 
88.700 

107.750 

107.750 

107.750 

107.900 

107.900 
107.9Qfi-101 
101 

107.900- 107 
101 - 101.200 
101 - 101.200 

107.900-107 
107.000 
93.000 

93.000-92.750 
95.000 
95.150 

95.150- 105.50C 
91.350-106.1 Ofl 

95.150- 1 05.50| 
93.000 
95.000-102.450 
100.100 
90.100 

95.000-102.450 
107.000 
107.000 

107.300 

107.300 

107.300 
93.000-95.000 
90.500 
90.500 


RADIO MILANO INTERNATIONAL s.r.l. - Via Locatelli 6,20124 Milano (Italy) - Tel. (02) 6559221 r.a. - Telefax 6704900 





































